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PREFACE 


This manual is directed at programmers using the 3300/3500 Meta-Assembler. It discusses the 
principles, features, methods, rules, and techniques of producing a META language program. 


The reader is assumed to be familiar with the CONTROL DATA® 3300 Computer System or the 

CONTROL DATA® 3500 Computer System. In addition, familiarity with the 3300/3500 MASTER | 
Multiprogramming Executive Operating System and the 3300/3500 COMPASS Assembly Language 
is helpful. 
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1.1 
FEATU RES 


60236400 


The 3300/3500 META/MASTER, a Meta Assembler executing on a 
CONTROL DATA” 3300 Computer System or CONTROL DATA” 3500 Com- 
puter System, provides a versatile, extensive, and self-extending language 
for directing the generation of object code. 


Using Meta~Assembler (META), the programmer can choose a relocatable 
binary output format acceptable for loading and executing under the 3300/ 
3500 MASTER Multiprogramming Executive Operating System, or define 


output as a byte stream not restricted to a 24-bit object word. Meta- 


Assembler is an ideal language in which to code compilers and assemblers, 
or to produce code for an alternate computer system. The object computer, 
real or simulated, may have a word size up to 48 bits. 


Source statements to META include directives that control the assembler 
in much the same way machine language instructions control the computer, 
procedure definitions and references, and function definitions and refer- 
ences. 


The Meta-Assembler language allows simple, brief notation, nested 
functions and procedures, and complex expressions involving sets. 


Procedures and functions provide extensive parameterization of source 
statements. For example, META includes standard procedures for the 
3800/3500 machine language instructions and for generating equivalent 
code. While these mnemonics resemble the 3300/3500 COMPASS reper- 
toire, differences in syntax and in notation used for operand fields and 


modifiers cause incompatibilities between the two languages. In addition, 


META does not recognize COMPASS macros, most pseudo instructions, or 
numeric operation codes. For example, the representation of an octal 
number in the 3300 COMPASS language is a string of octal digits followed 
by the letter B. The representation of an octal number in the META 
language is the letter O followed by a ici of octal 7 enclosed in 
apostrophes. . 


A complete list of 3300/3500 mnemonic instructions is given in appendix B. 
A group of Meta-Assembler directives makes it possible for the program- 


mer to assign his program and data to as many as 15 relocatable control 
sections, as well as one absolute control section. The assembler main- 


1-1 


1.2 | 
HARDWARE 
CONFIGURATION 


“One CONTROL DATA 


tains a location counter for each section so that data locations within a 
control section are relative to the beginning of that section. The pro- 
grammer can increment these counters by words or bytes. (He can also - 


define the size of words and bytes.) 


The requirements for executing Meta-Assembler on the 3300/3500 are the 


minimum requirements for executing MASTER. 


MASTER minimum core memory (about 16K should be available for 
META) 


@ 


“One CONTROL DATA 3304 or 3504 Processor: — 


@ 


One CONTROL DATA 3311 Multiprogramming Module (3300 only) 


405 Card Reader and buffered controller 


e ® 


One CONTROL DATA 501, 505, or 3254 Line Printer and buffered 
controller 


One CONTROL DATA® 415 Card Punch and buffered controller 


Two CONTROL DATA® 3306 or 3307 (3507) Communication (Data) 
Channels © a 


2.5 million words (10 million characters) of mass storage. 
90K-100K words or about 9 scratch segments of mass storage should 
be available to META for its temporary files. 
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STATEMENT STRUCTURE 2 


2.1 
CHARACTER SET Programs written for Meta~-Assembler may use alphabetic characters 
| A-Z, numeric characters 0-9, blank spaces, and the special characters 


listed below. 


i, plus ' apostrophe 


less than or equal 


lA 


= minus 


lV 


= multiply greater than or equal 
/ divide [ left bracket | 

= equal Yj right bracket 

< less than — | t decimal exponent 


> greater than | binary exponent 


period 7 NOT 


; comma semicolon 


left parenthesis — right arrow 


identity 


al 


right parenthesis 


percent colon 


ff 2 ~~ 


dollar’ #8 VOR 
A AND 


The relationship of these characters to printer graphic characters, internal 
octal codes, and card codes is shown in appendix A. Characters that have 
special significance as operators are given in Table 2-1. 


2.2 


STATEMENT | | 
FORMAT | : A Meta-Assembler statement consists of a label field, a command field, an 


operand field, and a comments field. Each field is terminated by two or 
more consecutive blanks. 


Format: © 


| t | | | | 
+e A Olihisol ate OF €rariG OTVUTE f 
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2.2.1 
LABEL 
FIELD 


2.2.2 
COMMAND 
FIELD 


2-2 


Statements can begin in character position 1 and continue through character 
position 71. A semicolon in character position 72 indicates card continua- 
tion. Any information beyond character position 72 is not interpreted by 
Meta-Assembler but does appear on the assembly listing. Thus, columns 
72-80 can be used for sequencing. 


Within a field, a single blank can separate elementary items, operators, 
and delimiters. A blank is optional for separating a symbolic operator, 


such as **, from its operands, but is required for separating a mnemonic 
_ operator (AND) from its operands. | 


The label field begins in character position 1 or 2, and is terminated by two 
consecutive blanks. If character positions 1 and 2 are blank, the state- 
ment has no label. oe 


A label field may contain a symbol, set element reference, or SYM attri- 
bute function reference (section 6.5). A set element reference is legal only 
with an RDEF directive (section 4.3.2). 


The definition of a symbol in a label field depends on the content of the com- 
mand field. Throughout this manual, unless stated otherwise, a label field 
symbol is optional and, if present, is the value of the control counter prior 
to processing the command field. This value is either a word address ora 
byte address, depending on the command (section 3.1). 


The command field of a statement begins with the first nonblank character | 
following the label field and is terminated by two consecutive blanks. If the 
label field is blank, the command may start in character position 3. | 


The following are legal command field entries. 


An assembler directive 


A mnemonic machine instruction code followed by its modifiers which 
are separated from the instruction code by a comma 


The name of a previously defined FORM 


The name of a previously defined procedure which may be followed by 
a set separated from the procedure name by a comma 


* 


A SYM attribute function reference 
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2.2.3 
OPERAND 
FIELD 


2.2.4 
COMMENTS 
FIELD 


2.2.9 
STATEMENT 
CONTINUATION 


2.2.6 
EXAMPLES 
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The command field entry of a Meta-Assembler statement determines if an 
entry is required in the operand field. If present, the operand field begins 
with the first nonblank character following the command field. The oper- 
and field contains either an expression or a set that supplies information 
for the command field. For sets, see section 2. 7. 


- Two consecutive blanks terminate the operand field. 


Comments begin with the first nonblank character after the operand field or, 
if the statement requires no operand field, with the first nonblank character 
following the command field. In addition, if the first character of any field 
is an asterisk, all successive characters of the line are comments. Thus, 
when the label field entry begins with an asterisk, the line is a comment 
line. Comments can continue through character position 72 but cannot be 
continued on the next line. 


Any characters are legal as comments. Although META does not process 


comments, they do appear in the symbolic listing. Comments on lines of 
_ procedure or function definitions are not retained in the Meta-~Assembler 


representation of the definition. 


Normally, character position 71 terminates a source statement that has not 
yet terminated. However, a line of code that cannot be contained in the 
first 71 character positions can be continued to the next line by placing a 
semicolon in character position 72 and continuing: the field at character 
position 2 of the next line; character position 1 is ignored. 


Any character other than a semicolon in character position 72 is ignored. 


The following line contains all four fields. 


L 
A 
vw 


label | command operand comments 


2.3 
ELEMENTARY 
ITEMS 


2-4 


¢ 


The following line has a blank label field and does not contain comments. 


J. OA LO ° 


eget? ye 


command operand 


The following line is continued. 


a 
OP an 


'pad ie 


column 
72 


The following line contains a command and a comment. 
| | . | 
The following line is a comment line. 


| & PARAMETER LIST FOLLOWS... 


The following line is not continued; character position 71 terminates the 
operand field. | . , ae 


Ignored; 
not semicolon. 


Last significant 
character 


: al bd tall Fm PY r | a ; wv rd 


The basic representation of data for META are elementary items. An 
elementary item is self-defining|and its meaning is immediately obvious; 
no additional information is needed for its interpretation. Meta-Assembler 
recognizes the following as elementary items. | 


Delimiters 
Decimal integers 


Binary coded decimal (BCD) integers 
Octal integers 
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Floating-point real numbers 


BCD character strings, left or right adjusted 


ASCII character strings 


Arithmetic and logical operators (symbolic and mnemonic) 


2.3.1 
DELIMITERS META recognizes the following characters as delimiters. 
Comma Delimits subfields of a source statement field, 
elements of a set or subset, and subscripts of a set 
| element reference, 
Parentheses Enclose and delimit function arguments and nested 
| expressions. 
Brackets Enclose and delimit nested subsets and set element 
references. 
Blank Separates elementary items for visual clarity or de- 
limits them when required. 
Two blanks Terminate fields of'a source statement. 
Apostrophes Enclose and delimit character and numeric strings. 
: Within a character string, only the single apostrophe 
is a delimiter; any other delimiter is accepted as a 
valid character in the string. A pair of apostrophes 
signifies a valid BCD or ASCII apostrophe. 
2.3.2 
DECIMAL 
INTEGER © A decimal integer is a string of numeric characters from the character set 


0-9. Meta~Assembler converts a decimal integer to its binary equivalent. 

If the resulting binary number exceeds 48 bits, META truncates it with the 
loss of the most significant bits and sets an error flag. META also sets an 
error flag and truncates the resulting binary number if it exceeds a specified 
field size during data generation. 


_ Examples: 


429 
~-3 
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2.3.3 
BCD INTEGER 


2.3.4 
OCTAL 
INTEGER 


(2-6 


To specify a BCD integer, write the letter D followed by a string of one to 
eight numeric characters from the character set 0- 9, enclosed in 
roar | 


Examples: 
D'078' 
D‘'123' 
-D'123' 


A BCD integer is not converted to its binary equivalent, but is represented 
as a string of 6-bit BCD characters (appendix A). If the number of BCD 


characters is greater than eight, truncation causes loss of the most signifi- 


cant characters and META sets an error flag. During data generation, if 


the field into which the integer is to be placed is too small, META truncates 


the most significant characters and sets an error flag (section 4.5). 


If during data generation, the field size is greater than required, the BCD 
integer is right adjusted with leading zeros. 


Expressions containing BCD integers are evaluated using 6-bit BCD arith- 
metic. The sign of a BCD mines al is placed in the left bit of the rightmost 


digit of the number. 


| Examples: 


—-D'123' 


w Lelelel« 
D'123' 


An octal integer is noted with the letter O followed by a string of numeric 
characters from the character set 0-7 enclosed in apostrophes. 


Examples: 


— O'T7 
O'123' 


Meta-Assembler converts an octal integer to its binary equivalent. If the 

resulting binary number exceeds 48 bits, truncation causes loss of the most 
significant bits and META sets an error flag. If during data generation, the 
field into which the integer is to be placed is too small, META truncates the 


- most significant digits and sets an error flag (section 4.5). 
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2.3.6 
BCD CHARACTER 
STRING 
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A real or floating-point number is written as a maximum of 14 decimal. 
digits. It must contain a decimal point and may contain an exponent repre- 
senting a power of 10 designated by the letter E and an optionally signed 

1- to 3-digit decimal integer. 


Examples: 
1. 1. E+2 (1.0 x 107) 
35 7 327.7E-2 (327.7 x 1072) 
4.79 


* 


META converts a real number to 48-bit 3300/3500 internal normalized float- _ 
ing-point format. It consists of two 24-bit words made up of a 12-bit char- 
acteristic and a 36-bit mantissa. 


23 | 11 00 


word 2 mantissa 


Tf during data generation the field size into which the number is to be placed 


is less than 48 bits, a truncation error is flagged and the rightmost bits of 
the number are lost. For a negative value the 2-word value, including 
characteristic, is complemented. 


A programmer specifies that a BCD character string be either right adjusted 
with leading zeros or left adjusted with trailing blanks. 


A right-adjusted character string is written as the letter C followed by a 
string of not more than eight legal BCD characters enclosed in apostrophes, 


or simply as a string of BCD characters enclosed in apostrophes. 


A left-adjusted character string is written as:‘the letter L followed by a string 
of not more than eight legal BCD characters, enclosed in apostrophes. 


Because an apostrophe is used as a delimiter, the representation of an 
apostrophe as a character in character strings is two consecutive apostro- 
phes. | 


Examples: 
'ABC' Right-adjusted string of three characters ABC 
C'A'BC'! Right~adjusted string of four characters A'BC 


L'A' BC! Left-adjusted string of five characters A''BC 


2.3.7 
ASCII 
CHARACTER STRING 


2-8 


If the number of characters in a BCD string exceeds eight, truncation causes 
loss of the leftmost characters and META sets an error flag. During data 
generation, if the field into which the character string is to be placed is too 
small, META truncates the leftmost characters and sets an error flag. 


If the field size is greater than that required to hold a left-adjusted string, 
the string used in data generation is left adjusted with trailing blanks. If 

the field size is not a multiple of 6 bits, the extraneous bits are on the left 
and are 0. The remainder of the field is used for characters and is blank 
filled. : ee oe 


Example: 


 L'AB' is stored in 21-bit field as 


20 17 11 05 00 
ef 4 [- Bf A 
3 bits zero 


A right-adjusted string used in data generation is right adjusted with leading 


zeros if the field size is greater than that required to hold the string. 


An ASCII character string is written as the letter A followed by an apostrophe, 
a string of one to six ASCII characters (appendix A), and an apostrophe. 
Each ASCII character occupies eight bits. | 


Because an apostrophe is a delimiter, an apostrophe as a character in the 
string is represented as two consecutive’ apostrophes. 


Example: 
A'AB'CD! A string of five characters AB'CD 
A'ABC'™ A string of five characters 'ABC' 


If the number of characters exceeds six, truncation causes loss of the left-_ 
most characters and META sets an error flag. During data generation, if 
the field into which the character string is to be placed is too small, META 
truncates the leftmost characters and sets an error flag. 


An ASCII string used in data generation is right adjusted with leading zeros 
if the field size is greater than that required to hold the string. 
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2.3.8 
OPERATORS 
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The following table summarizes legal Senne and their hierarchies and 


: ne 


Table 2-1. Legal Operators 


Alternate 
ee Mnemonic Meaning © 


Greater than or equal 


Unary plus 
Unary minus 


Decimal scaling 


Binary scaling 


Arithmetic product 
Arithmetic quotient 
Arithmetic addition 
Arithmetic subtraction 
Less than (compare) 
Equal (compare) 

Not equal (compare) 
Greater than (compare) 


Less than or equal 
(compare) 


(compare) 


Logical difference 
(exclusive OR) 


Logical addition 
(inclusive OR) 


Unary equal; 1-word 
literal 

Unary double equal; 
2-word literal 


Hierarchy 


2.4 
SYMBOLS 


2.5 
LOCATION 
COUNTERS 


260 | 
EXPRESSIONS 


2-10 


A symbol is an alphabetic character from the set A-Z followed by 0-11 


alphabetic or numeric characters from the sets A-Z, .0-9. ° 
Examples: 
Legal Symbols Illegal Symbols 
Pp | 5A 
R3 : ST$RT 
PROGRAM _ | ABC-1 


A unique location counter is associated with each of the 16 control sections 


‘available under Meta-Assembler. META interprets a reference to a con- 


trol section name as a reference to the current value of the location counter 
(a word address) within that control section. 


In addition, META interprets the character $ as the value of the current 


location counter, a word address, prior to processing the line containing $. 


Location counters are discussed in detail in section 4. 4. 


A combination of one or more elementary items, symbols, set element 
references, or function references makes up an expression. The program- 
mer can form subexpressions by using parentheses in the normal role of 
arithmetic grouping. Thus an expression may contain subexpressions which 


in turn are made up of operators and other subexpressions or elementary 
items. | | 


Examples: 


$ 
A+ 2 


(A+ 2)*B 
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Rules for evaluating expressions are: 


Expressions are evaluated left to right with lower numbered hierar- 
chies evaluated first. | 


Parenthetical subexpressions are expanded from the inside and are 
performed first. 


Operators of equal hierarchy are evaluated left to right. 


If a mnemonic operator is used in lieu of a special symbol (e.g., DS 
instead of {), it must be preceded and followed by a single blank. 


~The value of a compare operation is 1 if the expression is true, 0 if it 
is false. | 


For the < or LT and the > or GT operators, 0 is greater than -0. 
For the < or LE, the l= or NE, and the = or EQ operators, 0 is 
equal to -0. 


In expressions used for data generation, META performs the arith- 
| metic operation and places the vuiue in the specified field. If the 
_ a 7 . resultant value exceeds the specified field size, META truncates the 
| | most significant bits and flags the error. 


Examples: 

Expression Evaluation 
1 At BSC Add A to B; compare the result to C. 
q 4 © A+ B¥C Multiply B by C; add A to the product. 
TW (A + B)*C | _ Add A to B; multiply the sum by C. 

(A<B) ++ (C>D) Compare A to B; compare C to D; perform 
‘ a logical OR on the two subexpressions. 
4 | _*s , * If either or both inequalities are true, the. 


value is 1; if both are false, the value is 0. 


If an expression contains relocatable symbolic addresses, its value must be 
relative to a single location counter, or not related to a location counter and 
thus nonrelocatable. 


Examples: 


In the following examples, P;,D;, and C; refer to relocatable addresses in 
the program, data, and common areas. | | 


The following are relocatable addresses. 


Pp : peti ~C 
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2.6.1 
ATTRIBUTES 


2.6.2 
MODES OF 
EXPRESSIONS _ 
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Subtracting one relocatable address from another in the same program con- 
trol section produces an absolute nonrelocatable result. | 
Pp 1 = Po . : 
— Cyt Co 
Dy - Py + P2o- Dot Cy - Ce 
The result of an expression cannot be the sum of two or more relocatable 


addresses in the same or different control sections. The following are 
illegal. | 


P, + (Pg + 5) Relocated twice relative to P_ .- 
P+ D Relocated to both P and D- 
-Pj - Po + P3- P4 Relocated twice relative to P 


Single relocation or an absolute value can legally result from a complex 
expression. 


P; - Po + Pos | Single positive relocation 

-P, + Po - Pg | - Single negative relocation 

P+ D, - D+ 2) -Cy+ (Cz -6) Result P-8 is single positive 
relocation 


P,t (Pot 5)+ D,-(D, SS 2)-C,+ (Cot 6) ‘Result + 9 is not relocatable _ 
| relative to any control section. 


& 


An attribute is a property of an expression, such as its mode. Intrinsic 
attribute functions interpret the properties as values that can be used in 
expressions. Chapter 6 describes the Meta-Assembler attribute functions. 


A mode associated with each elementary item defines how META is to inter- 
pret the data when it performs an arithmetic operation on the item. Meta- 


Assembler recognizes 11 modes accessible through the mode attribute 


function (section 6. 2). 


Expressions are evaluated using either integer, real, or binary-coded- 
decimal arithmetic. META permits mixed-mode arithmetic on real and 
integer values, converting the integer to a real value and performing the 
operation in floating-point arithmetic. The mode of the result is real. With 
any combination other than real and integer, if all elements of the expres- 
sion are not of the same arithmetic type, META flags an error and sets the 
value of the expression to 0. 


60236400 


60236400 


In arithmetic and relational expressions, META treats character strings _ 


and addresses that are not external as integers. 


META performs logical operations on a bit-by-bit basis without regard to 
mode. The result of a logical or compare operation is in integer mode. 


The following table shows legal combinations of operators and operands. 
For +, -, *, and /, interchanging the first two columns does not affect the 
result. The mode of the second value must not be external. 


cd 


- Table 2-2. Combinations of Operators 


Mode Ist Mode 2nd Mode of 
Operator | Value Value _ Result 


Integer 


Integer 


Integer 
Real 
Decimal 


Real 
Decimal 


Integer 
' Integer 


| Integer Integer Integer 
| Real Integer Real 


Integer Integer Integer 


Integer Real Real 

Integer Word Addr Word Addr 
Real Real Real 

Decimal Decimal Decimal 

Word Addr | Word Addr Word Addr 
Word Addr Byte Addr Byte Addr 
Byte Addr Byte Addr Byte Addr 

Ext Wrd Addr Integer Ext Wrd Addr f 
Ext Byte Addr Integer Ext Byte Addrf 


Integer | Integer : Integer | 
Integer Real Real 
Real ‘| Real Real 
|Decimal Decimal Decimal 


>,=,1=,<,<,2 |Mode1,3,5,7, | Modc 1,3,5,7,| Integer 


9,111t 9,117T 
Real Real Integer 
Decimal Decimal Integer 


{ External word addresses and external byte addressed cannot be 
interchanged. ) 7 
Tf Section 6.2 | | 


2.6.3 


LITERALS 
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Scale factors, both decimal and binary, must be integer. 


Examples: 


1.5*3 | Legal: value is 4.5 real. | 

D'15'+ D'17' Legal; both items are decimal integers. 
p's! +. ‘6 _ Illegal; conflicting modes. 

1.542.5 7 Illegal; scaling factor is not an integer. 


A literal is an expression beginning with an equal or a double equal sign 


depending on whether the value is to occupy one or two words. 


Examples: 
» =O'77700077' ==1.2 
=-A+B-$ = = A'ABCDEF' 
=1 | == 


META places the value of the expression in a literal table. If the value ex- 
ceeds the specified number of object computer words, META truncates it 
and flags the error. If the object computer word size is greater than 24 
bits, use of a 2-word literal causes truncation because the maximum pre- 
cision allowed is 48 bits. By using one or more LIT directives (section 
4.4.5), the programmer can designate which control sections are to contain 
literal tables. If the program contains no LIT directive, the literal table is . 
appended to the program section. The address of a literal is the address of 
the literal table entry relative to the beginning of the control section. Liter- 
als with identical expression values are entered into a single literal table 
only once. 


An attempt to place a literal in a numbered common area is flagged as an 
error; numbered common cannot be preset. 
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2.7 
SE 
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A set is one or more set elements separated by commas. A set element is 
an expression, a Set name, or a subset. A subset is a set enclosed in 
brackets. 


The NSET directive (section 4.3. 3) assigns a set name toa set. Set names 


can also be assigned through the PROC and FUNC directives (sections 


5.1.1 and 5.1.2). 

Examples: 4 | : , i. & ee 

A NSET AZ A is a Set of two elements. 

| iB NS ET, Kt&, 4 | B is a set of two elements. 
The first element is an 
expression; the second is 
a set name. 


A.» tend C is a set of three ele- 


ments. The first is a sub- | 


7” Gj, Aisi | set which is a set of two 


elements. The second 
element is a subset which 
is a set of two elements, 
the first of which is itself 
a subset. The third ele-| 
ment is a set name... 


In the preceding example, the first element of set C could have been written 


as A. 7 


To refer to a set element, write the name of the set followed by a left 


bracket and one or more expressions separated by commas and a right- 
bracket. The values of expressions represent the ordinal location of the set 


element referenced. From left to right, they represent the level of the ele- 


ment in a set containing subsets. To refer to an entire set, write the name 
of the set. , 


If the reference is to a nonexistent element, META uses zero. 
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Example: 


| The symbol A is defined as the set 5, C, [9, [3,4]]. The set has three ele- 
ments. The third element [9, [3,4]] contains two eJements, the second of 
which also contains two elements [3, 4]. 


Reference | Element — Value — 
A All 5,C, (9, [3,4]] 
A[1] _. First element of A 5 | 
A[2] - Second element of A C 
A[3} Third element of A 9, [3,4] 
A[3, 1] First element of subset 9 

| | of third element of A 
 AY3, 2] Second element of sub- 3,4 
| | set of third element 
of A 
A[3, 2,1} First element of sub- 3 


set of second element 
of subset of third 
element of A 


A[15,33] Nonexistent element 0 


In the preceding example, if C is a set name for a set consisting of the list 
elements 7, 8, 6, elements of C could be referred to as follows: 


‘Reference Element | Value - 
Af[2,1] or C{1] First element of C 7 
A[2, 2] or C[2] Second element of C 
A[2,3] or C[3] Third element of C 6 


The Meta~Assembler maintains information about a set and its elements to- 
gether with the symbol defining the set. The programmer can access this 
information for use by the assembler through attribute function references. 
For example, the NUM attribute function (section 6.3) supplies the number 
of elements in the set. 
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LOCATION CONTROL AND ADDRESSING 3 


-Meta-Assembler provides location control by making available one absolute 
and up to 15 relocatable control sections, each with an associated location 
counter. The counters can be incremented in word or byte increments. 


3.1 

RELOCATABLE 

ADDRESSES | A relocatable address is either a word address (mode 9) or a byte address 
(mode 11). Mode is specified implicitly by the directive. Word-oriented 
directives cause definition of relocatable word addresses. Byte-oriented 
directives cause definition of relocatable byte addresses. 


A label field symbol is a word address for the following directives. 


RES TEXT 
GEN TEXTA 
- GEND 


Also, literals and control section names are word addresses. A reference 
to a control section name returns, as a word address, the current value of 
the location counter in use prior to processing the line. Use of the $ returns 
the word value of the current location counter prior to processing of the 
line. 


- For the following directives, a label field symbol is a byte address. 


NOLIST LIT DETAIL ENTRY 


LIST RESB SECP EXT 
SPACING GENB SECD GOTO 
EJECT TITLE SECA ENDS 
ORG BRIEF TEXTC PREF 
LIBS 


A label field symbol on a FORM reference line or a procedure reference line 
is a byte address. This means that a mnemonic instruction (which is actu- 
ally.a procedure reference) does not cause the counter to be rounded to the 
nearest word address. | 
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A word-oriented directive that follows a byte-oriented address causes the 


‘control counter for the section to be rounded up to the nearest word address. 


A byte-oriented directive always uses the next available‘ byte.. 


Use of the $ returns the word value of the current location counter prior to 
processing the line. 


Examples: 


# 
#; 


SB Reserve Il byte 


Reserve 1 word 


Reserve 1 byte 
Reserve 1 byte 


RES in the first example causes the control counter to be rounded up to the 
next word boundary prior to definition of the symbol B1. +ne control 
counter is not rounded up in the second example. 


A 5 St Computer word of four 6-bit bytes. 
SECP,.. PROI PROG is control section name. 
re OKM vars > | FORM defines three fields; 24 bits. | 
, aa Form reference; XY is a byte address. 
( M G 42405 Control section; XM is a word address. 
Af 0, _isf  ¢ returns XK as a word address. 
ce] 2 |Literal XZ is a word address. 


RES and RESB are discussed in sections 4.4. 6 and 4.4.7. 
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3.2 
LOCATIONS 
COUNTERS 
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Location counters are designated 0-15, corresponding to the 16 control sec- 
tions a programmer can define using SECA, SECD, and SECP directives 
(chapter 4). | 


Location counter 0 is reserved for the absolute control section (defined by 
SECA). | 


Location counter 1 is reserved for the first program control directive. If- 
the program has no SECP directive defining a program control section name, 
location counter 1 is still used for the program. 

Location counters 2 through 15 are used for either program control sections — 
or data control sections. As META encounters each SECP or SECD direc- 
tive, it assigns the next available location counter. | 


. 
. . . . 
4e 4 
’ 
. ‘ a 
a ‘ . 
. . 
i . 
: » 
an ; . 
. - . ' ’ 
* > . 
. 
' * 
* a 
. 
. ‘ 
‘ ‘ . 
. $ . 
1 
' 
* 
° . 
. ' . : . 
+ eo. . 
« . 
: . 
* 
' 
‘ 
- . . 
- a . $ 7 
. 
‘ 7 ' 
. 
- , = = 
* tT 
* : 
. ; 2 . 
se - 
+ . 
ry iy * e 
‘ . = + 
"i ,’ 
a 
’ ‘. : 
. . . 
7 ” 
. “ 
Fs : 
. . 
. - ‘ - 
‘ 
. : » 
a : : = 
. ; : . ; - ‘ 
+ 
‘ F . ¢ 
. . 
4 
. - 
' 
‘ . 
; ‘ ' 
< ‘ ‘ 
« Fj = é 
F ‘ 
. 4 . 
. 
x ' 
> ‘ 
r 2 . 
. - ’ - 
“= 
' a F : ; 
' 
a ' 
- : . . 
3 . 
. . *. : 4 
+ 
- q > 
. . . ° 
. . - 
' 7 . 
' : , 
, 
. 
a ‘ 
. = a > 
- . : . 
' . ' 
2 \ . 
5 i ' 
> 
7 : . . ry 
’ * 
’ 
' ‘ ’ ' 
. . . ° - 
° : 7 - P 
- s ' ' a 
. ; . * : : 
,, . 
' 2 
« . 
. . ’ * 
- : ° 1 
. : ' "3 
; ; 
* . . F . 
‘ . 


4.1 
LISTING 
CONTROL 


4.1.1 


-NOLIST 
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DIRECTIVES 4 


Directives control the operation of Meta~-Assembler much the same as 
machine mnemonic codes direct the computer. The programmer can use 
directives to: | 


e Control the content and format of the Meta-Assembler listing. 


Define word and byte size when the object computer is not a 3300 or 
3500. ; 


® Define a symbol and assign it a value or set of values. 


® Assign up to 15 relocatable and one absolute location counters for 
address assignment. 


@ Generate code to be loaded and executed on the object computer. 
® Specify field sizes for the object code. 


® Specify that certain symbols are entry points to separately 
assembled subprograms, or that symbols used within the current 
subprogram are external to it. 


@® Repeat or skip source statements conditionally. 
® Terminate assembly of a subprogram or group of subprograms. 


® Define a procedure and assign it one or more names for subsequent 
reference. 


@ Define a function and assign it one or more names. 


Through listing control directives, the programmer suppresses portions of 
the output listing, selects spacing, places a title at the top of any page of the 
listing, and requests the level of detail he wants to appear in the listing. 

For all listing control directives, a label is optional; if present, it has the 
current location counter value. ‘ 


NOLIST suppresses generation of the output listing until the assembler en- 
counters a LIST directive. The NOLIST line is suppressed from the listing. 


Format: 
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LIST LIST causes resumption of the normal assembler listing following a NOLIST | 
directive. LIST appears on the output ws | 


Format: 


label. LIST. comments... 


4.1.3 
SPACING SPACING allows the programmer to select single, double, or triple spacing 
| in the output listing. , 
Format: 
VJ 1 A. ” PX I Waal AY & ORs lal-Fi 
exp _ Expression evaluated as 1, 2, or 3 corresponding to 
single, double or triple spacing, respectively. Other- 
wise, directive is ignored. 
The specified spacing remains in effect until another SPACING directive ap-. 
pears. If no SPACING directives appear in a program, the listing is single 
spaced. 
& 
4.1.4 
‘EJECT EJECT terminates the current page of the output listing and causes listing to 


resume at the top of the following page. EJECT is printed as the first line 
of the next page. 


Format: 


abel, ETECT.. comments... ~ 


If EJECT is already the first line of a page, it is printed but has no other 
effect. 
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TITLE 


6 
BRIEF 


4.1.7 
DETAIL 
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TITLE causes the current page to be ejected and the TITLE directive line 
itself to be printed on the first line of the new page. Until another TITLE 


_ directive is processed, all succeeding pages begin with this title. — 


Format: 


terotning.!.. comments. 


character string 1-56 characters that appear as title at 
top of each page of output listing 
(section 8. 1) 


BRIEF causes listing of source lines and lines of code generated by data 


_ generating directives only. BRIEF remains in effect until a DETAIL direc- 


tive occurs. The default mode of listing is BRIEF. 


Format: 


DETAIL causes listing of all lines of code other than library procedure defi- 


nitions in subsequent LIBS directives (section 5.1.6) and causes listing of 


procedure expansions, DETAIL remains in effect until a BRIEF directive 
is processed. A NOLIST directive takes precedence over a DETAIL direc- 
tive. | 


Format: 


abet . DETATL . comments: — 
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4.2 | 

OBJECT MACHINE 
DEFINITION 

(UNIT) 


. 4.3 
SYMBOL AND SET 
DEFINITION 
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The Meta-Assembler running on a Control Data 3300 or 3500 Computer Sys- 
tem to assemble programs for other computers must have certain informa- 
tion about the object computer to generate the proper binary information. 
The UNIT directive defines the byte size and word size of the object compu- 
ter. Word size of the object computer must not be less than 8 bits nor 
greater than 48 bits. 


Format: 
Y/ . . a | , ; , 
La DCs NA CX 0 (0 OMMEL 
label Optional | | 
exp, Evaluatable nonrelocatable expression defining the byte 
| size of the object computer in bits. During assembly, the 
location counter is incremented by 1 for each exp, bits. 
EXP Evaluatable nonrelocatable expression specifying oe num- 


ber of bytes per worc. 


In the absence of a UNIT insti: META uses the host computer unit size 
of 6 bits per byte and 4 bytes per word. Binary output is in the form accep-. 
table to the 3300/3500 MASTER relocatable loader. 


UNIT, if used, must precede all lines of code other than listing control di- 
rectives and comment cards. Use of UNIT causes binary output to be in the 
alternate form (appendix C). | } ae | — 


a 


A symbol that appears in the label field of an EQU or RDEF directive has a 


defined value. Whenever the symbol is used in an expression, this defined 


value rather than the address of the symbol is used in evaluating the expres- 
sion. . 


A symbol that appears in the label field of an NSET directive or the label 
field, command field (as a modifier), or the operand field-of a PROC or 
FUNC directive (chapter 5), becomes the set name for a list of set elements. 
Whenever the subscripted set name is used in an expression, the value of 
the set element is used in evaluating the expression. "3 
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EQU EQU assigns the — and attributes of the aerial field expression to eal 
label field —_— 


Format: 


' The label field must contain a symbol. A symbol defined by EQU cannot be 
redefined later in the program. 


Example: 


4.3.2 7 
RDEF RDEF assigns the value and attributes of the operand field expression to the 


symbol or set element named in the label field. 


- Format: 


abet, RDEF . exp . commer 


The label field must contain a symbol or a set element reference. The value 
and attributes assigned to this symbol or set element remain in effect until 
an RDEF with an identical label field symbol or set element is processed or 
until an RPT (section 4.7.1) with an identical label ‘field symbol is pro- 
cessed. If the operand field is blank, the symbol or set element has a value 
of 0. 


Example: 


A has value of 15 

B has value of current location counter 
C has value A + 3, or 18 

Illegal; A is doubly defined 

Illegal; B is doubly defined 

Legal; C changed from 18 to 20 

D has value 0 

Illegal; D may not be redefined 


Define set E 
Redefine element two of set E 
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4.3.3 
NSET i NSET assigns the label field symbol as the set name of the operand field | 
| : | _ set. The label field must contain a symbol which is the name by which the 


set or set elements can be referenced. If the operand field is blank, the : 
set consists of one element which has a value of 0. 


Format: 


Example: 


rd 
& 

A 
ww 


* 
- ate ee © ee ye NR * 
See oe >: bet, iy ie Mee ay 
“a's We ha ge tiny ey ce 


A is a set of three elements. 


B is a set of two elements, the second of which is a set of two ele- 
ments. 


C is a set of two elements, the second of which is a set of three 
elements. 


D is a set of one zero element. 


A[2] is redefined to be 9 in the last line of the examples: thus the final 
set A is defined as though the following had been written. 


A. NSET..2, 9,4 —_ 


An entire set can be redefined through use of NSET. 


Example: 
AY. Vor 
= A F ie | Roe ail 
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4.3.4 


FORWARD : | 
REFERENCES ' A forward reference is a reference to a symbol or set element before it is 


defined. The Meta-Assembler processes forward references in two passes. 
On the first pass, a reference to a symbol before it is defined is not given a 
value; a reference to the symbol after it is defined is given the most recently 
assigned value. On the second pass, the forward reference is given the 
most recent value assigned. 


BEL. 


An expression cannot contain a forward reference if: 


1. The value affects location counting. 


2. The undefined symbol is defined subsequently by an EQU directive 
that contains a second forward reference. 


The undefined symbol or set element is not defined subsequently. 
4, The expression is not evaluatable. 
A forward reference to a symbol or set element redefined subsequently by 


RDEF or NSET directives that contain forward references yields the final 
value assigned to the symbol or set element. 


Examples: 
Legal use of forward reference First Pass second Pass 
f Q) B | _ A undefined A=2.5 
A pm), ; B= 2.5 | B= 2.5 
fA: FQU 1 XX Ltt. © AA undefined AA =7 
. RL | XX undefined XX = 2 
ofa GA 1 1 Ky BB undefined BB = 2 
) R DEF, YY =2 “vy =2 
XX . KDEF. XX =7 XX =7 
9EN . |. AA _ AA[2] undefined AA[2] = 9 
BB FOU .. 8 15:,5,, £BB=8 BB = 8 
AA WS ele AA[1].= 1; AA[2} AA[1] = 1; AA[2] 
GEN... AACZ]., =8;Aaisj=7 = = 8;|AA[3] = 7 
Ai ALA KIER. Y AA[2] =9 AA[2] =9 
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4.4 
LOCATION 
* CONTROL 


4-8 


Replacing the last line of the previous example with the following would 
achieve the same result. - | | 


Tegal Forward References: 


GEN directive contains forward 


¥ : A Ay 
Af =/ 20 reference to AA which is defined 
aia *” &, f; a pe 
ae by an EQU containing a forward 
<} <a 10, if reference. 
AA. KDEF, . &S Value affecting location counting 
BE En , must be defined on first pass. 
Kf Ax : RES affects location counting. 
ALF = ose Value affecting location counting 
BB EU \ must be defined on first pass. 
RES ji fe | RES affects location counting. 
Ax NSE. EE Value affecting location counting 
BL FOU... § must be defined on first pass. 


—e ata ta RES affects location counting. 


¢ 


Meta-Assembler provides one absolute and 15 relocatable control sections, 
each of which has an associated location counter. Any program can use 
one or more control sections. 


Meta-Assembler directives described in this section assign names to con- 
trol sections and address values to location counters. 
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4.4.1 


~ SECP ‘The first SECP directive defines a program control section. 
Format: | : — , 
habe A CP AV £7) Ot Ad 
label Optional; if present, label has the value of the location 


counter after the SECP directive is processed. 


sym 1-8 character name of program control section (subpro- 
gram name). A reference to sym later in the program 
returns the current value of the associated location 
counter. . | 


After the first SECP naming a specific sym, successive SECP directives 
using this sym indicate that the code that follows is an extension of the pre- 
viously declared program control section. A programmer coding for 
MASTER may use only one program control section; any additional SECP 
directive naming a new sym is flagged with an informative D error. 


4.4.2 
SECD _ The first SECD in a program defines a blank common, numbered common, 
or labeled common control section. 7 


Format: 
& LADEL | pam | I hd Xf OR Ais alA’ 
label Optional; if present, label has the value of the ‘location 
counter after the SECD directive is processed. 
sym Optional; name of control section defined or referenced. 
zero or — Control section defined or referenced 
blank | is zero or blank common. 
1-8-character Control section is labeled common 
symbol block, | 
1-4 decimal | Control section is numbered common 
digits block. . 


For the 3300/3500 relocatable output, if sym is blank or 
0, the block name is 1AAAAAAA for chapter 1 and 2AAAAAAA 
for chapter 2. For other than the 3300/3500, the block 
name depends on the item type (appendix C). 
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If sym is a symbol, a reference to the symbol later in the 
program returns the value of the associated location -_ 
counter. | 


exp Optional; if execution is under 3300/3500 MASTER, exp is 
an evaluatable expression with value 1 or 2 designating the 
chapter to which the section is assigned. If exp is absent, 
chapter one is assigned. 
Each new sym on an SECD directive causes creation of a new control section - 
starting at relative address 0. If a sym appears on a subsequent SECD di- 
rective, exp is ignored and code following the subsequent SECD directive 
down to the next location control directive is an extension of the previously 
-- declared control section. i 


4.4.3 | | a 
SECA A program can have an absolute control section declared by a SECA direc- 
tive. 
Format: 
Vy GF 4 a 4 
Lt ite io we oh fi ON 4s cal Nile i 
label Optional; if present, label has the value of the location 


counter after the SECA is processed. 


sym . 1-8 character name ofthe absolute control section. A 
| subsequent reference to sym returns the current value of 
the absolute location counter. 


Any SECA directive after the first one in a program indicates that the code 
following it is an extension of the originally defined absolute control section. 
If SECA is preceded by an ORG directive setting the absolute location 


counter, the code following the SECA extends the absolute control section. 


SECA cannot be used when coding for MASTER. 
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4.4.4 | | | - 
ORG ORG sets the specified control counter to a specified address. 


Format: 
Vabet. ORG. exp. comments. . 


label Optional; if present, the label has the value of the location 
— counter after the ORG directive is processed. 


exp Evaluatable expression. The expression indicates the con- 
trol counter to be selected and the address to which it is to 
be set. Lines of code following ORG. are placed in the con- 
trol section indicated. 


Examples: 


E P_. ALPHA . Defines program control section 


ene GUY Forni Se Care ae Oe UO UO me a Ls Wee So ALPHA. 


oe ee, (ee ces eee ee Ce Gs eee | 
SECD . COMM, 1. : Specifies labeled common block of 


COMM in chapter one, 


op OD 5 ees 4 Specifies numbered common block. 


Chapter one is implied. 


DK: . ALPHA | Specifies resumption of program con- 
p : . trol section. (Here, ORG has the same 
: effect as SECP ALPHA). 
as, f OM Specifies resumption of labeled 
° | common block COMM. 
BD a Location within COMM. 


may, 
o K S A Selects absolute location counter and 
: sets its Value to 50. 


pe, Specifies blank common. For the 3300/ 
| 3500 the block name is 1, AAAAAAS 
otherwise, the block name is 00000000. 


DE (s I, Selects the location counter for COMM 
8 | and sets the location counter value to 
the value of D. 


At alm Specifies resumption of program con- 
trol section ALPHA, 
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4.4.5 


LIT : LIT designates the control section in which literals are to be placed. 
Format: 7 
‘a ara 
‘ts sit i Basti Ala 
label Optional; if present, label has the value of the location 
counter. | 
sym Name of a previously defined control section. 


META places literals (section 2.6.3) in the control section specified by a 
LIT directive, regardless of which control section contains the reference, 
until it encounters another LIT directive designating a different control sec- 
tion for literals. In any given literal table, only one entry is made for 
identical literals. However, a literal table can have entries that duplicate 
entries in other literal tables. A literal results in the generation of object 
code. 


In the absence of a LIT directive, literals are appended to the first program 
control section. 


4.4.6 
RES RES adds Hie ite of the expression in the operand field to the current loca- 
tion counter value as a word increment to reserve storage. 
Format: 
+a ~ : 7 Chia 140-4" = : 
exp Evaluatable nonrelocatable expression (must not contain a 
forward symbolic reference or reference to an externally 
defined symbo)). 
Examples: 
fo fo , Increment location counter by two words. 
K fo S, 'p Increment location counter by ten words. 
“¢ =~ Decrement location counter by five words. 
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447° : ) 
RESB - RESB adds the value of the expression in the operand field to the current 


value of the location counter as a byte increment to reserve storage. 


¢ 


Format: 


ORGS tal At s bie 


“ 
* 
h 

& 
@ 


exp Evaluatable nonrelocatable expression by which to 
| increment the counter. 


Examples: 3 a ; 


41 if iG: Increment location counter 16 bytes. 
ESB , DB-B Increment 16 more bytes. 


4.5 

DATA | | | 

GENERATION ___s Data generating directives define data formats and generate words or bytes 
of information to be loaded into the computer at execution time. 


GEN | GEN places the values of expressions in the operand field set in successive 
| words, one word for each expression. a 


€ormat: 


Po e et, comments 


set Set of expressions to be generated. A set of sets is not 
permitted. 


. Examples: 


For the following examples, the object computer word size is 24 bits. 


( ~*~ 
A. GEN. Fe Agcn' Generate two words, the first 


containing 5, the second con~ 
taining the internal BCD 
representation of ABCD. 
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A. NOE 12 1G ABH Results in the same 
p 2 - values as the above. 
rs pear | Cora. wa ; 
NSET.. & £6, 7.1 1, legal; the set in the 
? ma GEN line must not con- 
oe tain sets. 
SET. 2, Lé Generate three words, 
yD FC 7 , | containing 5, 6, and 
— ~ | | 7. 


E GEN. ZS Illegal; values must 


be single precision. 


T Ltt pt ptyi44., Legal; reference to 
external symbol. 


4.5.2 | , | a 
GEND | GEND generates the values of expressions in the operand field set, two 
| object computer words per expression. Maximum precision for a value is 
48 bits. If the object computer word size exceeds 24 bits, META truncate 
the value to 48 bits and flags the error. — | | 


Format: 


y “PAR 4S. NALA e < y se ] 
label Optional | 
set Set of expressions to be generated. A set of sets is not 
| permitted. 
Example: 


In the following example, the object computer word size is 24 bits. 

A. GENO, 2.4, 25,0! Age." 

The code generates six words. The first two words contain the floating- 
point representation of 2.4. The next two contain the binary integer 


representation of 25. The last two words contain the internal BCD 
representation of ABC right-justified with leading zeros. 
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4.5.3 | oe | 
GEN i GENB evaluates the values of expressions in the operand field set and places 


the values in successive bytes. If the value ofan expression exceeds the 
byte size specified in the UNIT directive, META truncates the.value to the 
byte size and flags the error. | 


Format: 
af Pf) A p hdl NG ik, hee LF FP UTI: S 
label = Optional 
set Set of expressions to be placed in successive bytes. A set 
of sets is not permitted. 
Example: 


For the following example, the object computer byte size is 6 bits. 
0), he Nis A Ded =". 4m 


_. The above code generates five 6-bit bytes. The last byte contains the 
one's complement of -2 truncated to 6 bits (111101). 


4.5.4 a | 
FORM _ FORM defines a data format by specifying field sizes, left to right, in one 


or more object computer bytes. 


Format: 


aves ORM, DOMMES 
label Required; label is the name referring to FORM 
set A set of expressions, each of which defines a field size 


in bits. A set of sets is not allowed. 
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Examples: 


For the following examples, the object. computer byte s size is 6 bits. 
and the object computer word size is 24 bits. 


WGP De «3 F.@RM ZY, ee ee One field, four bytes 


AML ed - PRIM 4 3 | One field, eight bytes 
MAK KM >» dar Gir iG | Four fields, four bytes 
AD% - OR IV : | - Two fields, four bytes | 
NS, OKM | Four fields, four bytes 


To refer to a format defined by a FORM directive, place the label of the 
FORM directive line in the command field of a line. Supply a set of expres- 
sions, corresponding to the fields, in the operand field of the referencing 
line. A form reference generates code starting with the next available byte. 


A label on the line referring to a FORM directive has the value of the loca- 
tion counter prior to processing the line. If a value exceeds the specified 
field size or if the field size exceeds 48 bits, high-order bits are truncated 


,and an error flag is generated. For a negative value, the one's complement 


of the absolute value is used unless the value is in BCD decimal mode. For 
a BCD decimal value, the sign is inserted in the leftmost bit of the least 
significant character position of the field. 


If the field contains a 6-bit character type value and the field size is not a 
multiple of 6-bits, the characters are placed in the rightmost bits of the 
field with the leftmost extraneous bits zero. 


References to FORM directives can be circular. 


Examples: 


Generates the 48-bit floating-point value of 1.59. 
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14, AVS TON AV eee 
| | 4 ARC AL Al go: 5 Bo 2!, - 


Generates one word containing the following octal value: (22 ]l77]j27 [112 


f , ra’ G 

a Vi. = | 0 of?) . ie 
| o 
hp 


Generates a word with zero in the leftmost 7 bits and the byte value 
of the location counter in the rightmost 17 bits. 


' 4 Ti SA 2 iat di 


f I asad @ K | 


Fh Zz ,0,0,¢ As 


Generates a word with value 12 right adjusted in the leftmost 10 bits, 
zeros in the next 3 bits, and the current word address plus 2 in the 
rightmost 15 bits. 


- The following example illustrates circularity of forms. 


Generates 2 bytes 


Generates 2 bytes identical to 
last two 


Generates 4 bytes filling last 
with zeros 


Generates 5 bytes 


| ; | 4 
The 4 bytes generated by G are: | o4 | 10 | 20] 40 | 
the § bytes generated by Gare: | | 14 | "90 | 61 | 49 


In the following example, BCD characters XY are to be stored in a 19-bit 
field. | 


KY 


BCD characters X, Y, and blank are placed in the rightmost 18 bits of the 
field. The leftmost bit is 0. 
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4.5.5 
TEXT 


4.5.6 
TEXTC 


4.5.7 
—TEXTA 


4.6 
PROGRAM 
LINKING 


4-18 


TEXT generates an integral number of object computer words containing the 
specified BCD character string. : 


Format: 


Abe x TEXT. tét ion Ammer 


The last word is padded with blanks as needed. If the object computer word 
size is not a multiple of 6 bits, as many characters as fit are placed in each 


word, right adjusted with upper bits zero. 


TEXTC is identical to TEXT except that the BCD character string generated 
is placed in consecutive words without padding the last word. | 


Format: 


: be 4 TEX 'é fi A ' Ran hal nt 


TEXTC generates code starting with the next available byte. 


TEXTA generates 8-bit ASCII characters in the same way TEXT generates 
BCD characters. Padding of the last word, if needed, is with the internal 
representation of ASCII blanks. 

Format: 


ek - T/ 'sty ‘od in i? PN PE Fae. is 


The directives ENTRY and EXT do not define symbols, but either classify 
symbols defined within the subprogram as being known outside the subpro- 
gram, or classify symbols referenced in a subprogram as being defined 
outside of the subprogram. 
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4.6.1 
ENTRY 


4.6.2 
EXT 


4.7 
REPEAT 
‘AND SKIP 


4.7.1 
RPT 


60236400 


The ENTRY directive specifies which symbols defined may be referenced by 
subprograms compiled or assembled independently. That is, ENTRY 
directives list entry points to the current subprogram. 


Format: 


Symj 


Entry point symbols, 1-8 BCD characters 


OAs 
Ke \ 


fas 


4 


if 


se 


Ye MAGNE £1 


The EXT directive lists symbols which are defined as entry points in inde- 


appear in the subprogram being assembled. | 


Format: 
V.abe, XT. 14,9 y= Vi» l f VY} 
sym; -. External symbols, 1-8 BCD characters 


_ pendently compiled or assembled subprograms, but for which references 


Source statements can be processed repeatedly or skipped conditionally 
through use of the RPT and GOTO directives. — | | 


RPT specifies processing a portion of code a given number of times. 


Format: 


Fa) AE 
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label Optional; if present, the original value is 0. The 
| value of the label is tested and incremented by 1 
prior to each processing of the lines of code, to a 
final value that is the value of exp. ? 


exp ‘Absolute evaluatable nonrelocatable expression (con- 
| tains no forward or external references) indicating 
the number of times the following lines are to be 
processed. If exp is less than or equal to 0, the 
following lines are not processed and the RPT acts 
as a skip. 


linid Label of the last line to be sana by this RPT. 
If linid field is missing, one line is — 


RPTs may be nested to a level of at least six and possibly more depending on. 
available table space. Space not required for processing functions and pro- 
cedures could be used for additional levels of RPTs. Processing of repeated 
statements is from innermost to outermost. Every inner RPT range must lie 
totally within the range of the next outer RPT. 


‘The programmer can redefine the RPT label within the repeated statements 
to terminate a repetition prematurely. 


Examples: 


The following sequence generates a 10-word table of even numbers, 
0-18. Because linid is absent, only one line is processed. 


= S Pl. I Generates one word for each value 
hoy ¥ A, ¥; - 2 : 0, 2; A. Os Seiaxg tS | 


The following example illustrates two levels of repeats; the nested repeats 
produce 10 words. 


RP. 
? OT 


Sen | iN a » | : 


m- Pm © © WN 
O© 6 © © 6 
T 
an » ® ow 
maw mB WR FD 
i 
Dm =m NS pe DD 
Yo oui a 
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4.7.2 
GOTO 


60236400 


In the following example, lines 5-8 are processed three times. 


WS > A 
7 


repeat range 


x 
> 
“ 
Nn 
} 
ye > LP 
op 
: UNS 
S| 
oo” eo) >) ws 


In this example, the elements of set S are initially zero. On the first proces- 
sing of lines 5-8, Cis 1, and S[1].is redefined as A+ C-1, or 4. On the 
second RPT directive, the test S[1] = Bis not true (0); the GEN line is 
skipped. When lines 5-8 are repeated, C is 2 and S[2] is redefined as 5. The 
test S{2] = Bis true (1) so the GEN line is processed; it generates one word 
with a value of 20. On the final iteration, C is 3, S[3] is redefined as 6, and 
the test S[3] = Bis not true (0); the GEN statement is acuien Without the 
use of repeats, this example would be: 


ae rs ee) { } {} @ 
A=4 
as mai OF, 
a C adil 
S[1] = 4 
S[2] = 5 
|Generate 20 
te 4 S[3] oe 6 
GOTO specifies a conditional skip. 
_. Format: 
| / en)  . o 
LAG Lo DIYS CG Lm Fait Ned rh ea MeE? 
exp '  —Evaluatable nonrelocatable expression 
linid; Line identifiers defined as labels on lines following 


GOTO. 
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Expression exp is evaluated and used as an index to the list of line identifiers. a 
The line containing the label identified by the indexed line identifier is the . | | . 
next line assembled. For example, if exp has value 2, the second line iden- | | 
tifier is the label of the next line to be assembled. If 0= exp>n, where nis 
the number of line identifiers, assembly continues with the next line. 


Example: a | : | — 


For the following lines of code, since (B-A)*B = 2, the next line 
assembled after GOTO is the line identified by the second line identi- _ 
fier, the line labeled BILL. Lines between GOTO and the line labeled 
BILL are skipped. 


AA ae 


4.7.3 | , 

LNID LNID inserts a dummy label for line identification purposes. The label has 
no value and is not entered in the Meta-Assembler symbol table. As long as 
no ambiguity exists, the same label may appear on more than one LNID line, 
or on any non-LNID line, or on both LNID and non-LNID lines. 


Format: 


abet, LNID . comments. . 1 


There is no operand; comments can be entered immediately after the com- 
mand without the use of an asterisk. | 


LNID is particularly useful for defining the range of an RPT, since the use 
of normal labels may sometimes result in duplicate symbol definitions. : 
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4.7.4 
RPT AND GOTO | 
PROCESSING - When META encounters an RPT directive, it compresses lines of code © 
| within the RPT range by removing comments and redundant blanks, and 
stores the lines in an internal table of definitions. 


ite 
“ita 
at 


In the process of saving the lines of code within the RPT range, the assem- 
bler examines the command field of each line to ensure that the RPT range © 
does not include an END or FINIS directive. The assembler also recog- 
nizes procedure and function definitions (chapter 5) which are within the 
range of an RPT. | 


When a procedure or function definition appears within an RPT range, label — 
field symbols within the procedure or function definition are lucal to the pro- 
cedure or function definition and are not considered in determining the RPT 
range. 


Example: 


i) 


Not end of RPT | range 


End of RPT range 


A GOTO directive may appear within the range of an RPT. The object of the 
_ GOTO may be either within or outside the range of the RPT. If the object of 
a GOTO is outside the range of an RPT, the RPT is terminated. 


’ Within a procedure or function definition, the object of a GOTO or an RPT 

q must be within the procedure or function definition, and must be At the same 
: : level as the GOTO or RPT directive line. (Level of definition is discussed 
in section 5.4.) 


Examples: 


CAT. ,, 8B B is within the procedure definition and 
° is at the same level as the RPT 
directive line. 


&« 
SS 
a 
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48 | 
ASSEMBLY 
TERMINATION 


4.8.1 
END 


4.8.2 
FINIS 


4-24 


Be 


Illegal; B is not in the procedure 
definition. If the procedure is 

referenced, the GOTO is terminated 
on encountering ENDS. 


AN 


The directives END and FINIS specify the end of a —e and of a set 
of subprograms, respectively. ; 


END terminates a subprogram. The symbol in the operand field is optional 
but, if present, must be a symbol of eight characters or fewer declared as 
an entry point in some subprogram. The symbol specifies the symbolic 
location at which execution is to begin. 


Format: 


v 7 4 e ; 
re O, NLA Ww Feats SPR ats é 


FINIS causes termination of assembly. Normally, an assembly is a set of 
subprograms, each of which ends with an END directive. The FINIS direc- 
tive should follow the END directive for the final subprogram. 


Format: 


60236400 


eee: 
Barer : 
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PROCEDURES AND FUNCTIONS _ 5 


Procedure and function definitions are bodies of code resembling sub- 
routines but processed during assembly rather than object-time execution. 
They provide programmers with a means of conditionally generating 
sequences of code. A procedure reference consists of the appearance of 
the procedure name in the command field of a statement; the referenced 
procedure generates object code each time it is referenced according to 
parameters supplied with the reference. A function reference consists 

of the function name and its argument appearing in a statement; the 
function generates a value or set of values dependent on the argument. 


A procedure or function definition begins with 4 PROC or FUNC directive, 


respectively, and terminates with an ENDS directive. The definition must 
precede a reference to it. 


A functien or procedure definition can wholly contain other definitions and 
references to yet other definitions. Such definitions are nested. Each 
nested definition is considered one ‘evel higher than the definition that 
contains it. Nesting can occur toa level. of 14... Levels of neeene are 


_ discussed more fully in section 5.4. 


Examples of nesting: 


ii | Function definition 
Procedure : lies totally within 
definition |procedure definition. 


If the procedure being defined contains a forward reference to a locally 
defined symbol, proper data generation cannot result in a single pass. 

An optional parameter on the PROC directive indicates a two-pass 
procedure to permit local forward references. The Meta-Assembler then 
makes a preliminary symbol defining pass through the procedure similar to 
the first assembly pass of a program. 


51 
DIRECTIVES 


5.1.1 
PROC 


META provides niieas specifically related to use 5 of procedures and — 
functions. 


A PROC directive declares the beginning of a procedure definition. 


Format: 


Z Sell qj oC vi 


label Optional; if present, label becomes the name of sets 
| given on NAME lines in the procedure. | 


setname,; = Optional; set name that identifies the setin the _ 
| _ command field of the procedure reference, This 
setname is in the command field and is separated 
from PROC by a comma. | 


setnameo Optional; set name that identifies the set in the 
| . operand field of the procedure reference. 


exp Optional; if value of expression is nonzero, procedure 
- requires two passes. Note: This option requires | 
core for expression buildiug and causes a reduction in 
-assembly speed. It should not be used unless the 
procedure contains a forward reference. 


When defining a two-pass procedure, the user should take care to prevent 
the inadvertent doubling of expression values. For the following lines of 
code, after a reference to procedure TWO, A has value 1 because it was 
initialized to zero each pass; B has value 2 because it was not initialized | 
and was incremented once each procedure pass. - | 


Example: 


- Operand field set has name P_ 
TWO is entry name to procedure 


: TWO is reference to procedure 


Ox alta: 


> 
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FUNC | FUNC declares the beginning of a function definition. 
Format: 
F; os Vi be Bii< i hi PRiathilAd - 
label _ Optional; if present, label becomes the name of the 


sets appearing on NAME lines in the function when the 
function is referenced. 


setname _ Setname becomes the name of a set of parameters 
passed to the function. | 


A function should not include directives that generate code or affect 


counters. 
— 
Begin function FX 
: Lt 
la 
| 
End function FX 
2] Set B has two elements, 
4 and 5 
5.1.3 | | 
NAME NAME directives define entry names by which a function or procedure can 


be referenced. They must be between the PROC or FUNC directive and its 
associatec’ ENDS directive. The label field symbol of the NAME directive 
is used as the command field of the statement referencing the function or 
procedure. Any number of NAME directives can appear within a definition. 
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Format: 


ko Os A’i alas fo —s JTree & 

label Required symbol; an entry name to the procedure or 
function. 

set Optional set of expressions or sets that are to be 


associated with this NAME. The name associated with 
this set is in the label field of the PROC or FUNC 

directive preceding this NAME. If the PROC or FUNC 

label field contains a set name and the operand field 

of the NAME directive is blank, the set consists of one 

element having a value of 0. 


Example: 


f eo 
& i i iN 


Ni LE he 


The procedure can contain references to a set named E. When the 
procedure is referred to by name ENTERI1, elements 12 andI are 
assigned set name E as if the following line had been written: 


le | NSET. , 12... To 


If, instead, the procedure is referred to by name ENTER2, elements 
13 and J are assigned set name E as if the following line had been 
written: 
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ENDS terminates a procedure or function definition. . | 


Format: 


LAO € . tT, 


When ENDS terminates a procedure definition, META expects no operand > 
field entry. However, an asterisk must precede comments. : 


When ENDS terminates a function definition, exp is either an expression 
that defines the function value, a set name for a set of values, or set 
elements enclosed by brackets. A function reference that returns a set or 
a set name may be used instead of a subset. Thatis, to return a set, exp 
must be one of the forms: a 


(set) — 
setname 


func (set) 
Examples: 


Begin outer procedure. 


Begin inner procedure. 


END oa iiitiitii- End inner procedure. 


VS End outer procedure. 
IVC... : Begin first function. 


ENDE , + | End first function. The 
| value of the function is 
the sum of the first two 
values of the calling set. 
Jar | Begin second function. 


End second function. The 
function returns a set of 
values rather than a single 
. value. 


Re 


5-D 


5-6 


The TREF directive terminates processing of a reference to a procedure or 
function definition before the ENDS directive. 


Format: 


a OB adi al TAT s 


For a function reference, control returns to the statement containing the 
reference and passes to it the value or set defined by the expression in the 
operand field of the TREF. Exp is either an expression that defines the 
function value, a set name for a set of values, or set elements enclosed by 
brackets. A function reference that returns a set or a set name may be 
used instead of a subset. That is, to return a set, exp can be one of the 
forms: 


(set) 


setname 
func (set) 


Example: 


A reference to IDENT terminates at the statement before the LDA 
NAME directive. References to the procedure by names LDA or 
STA terminate at the ENDS directive. 
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5.1.6 . | , ; = 
The LIBS directive enables the user to retireve procedure definitions from 


LIBS 
a file. It must not appear within a procedure or function definition. + 
Format: . | 
abel. LIBS. bi" desist, seymgy us 4Symq comments 
label _ Optional symbol. 

° dsi Data set identifier of the file containing the procedure | 
definitions. This file, if it is not the system library 
file, must have been allocated and opened through use 
of MASTER control cards before META executes 
(3300/3500 MASTER Reference Manual Pub. No. 
60213600). Procedures are searched for by name; 
they can be in any order on the file. If no dsi is 
given, META.uses pAjA- 

sym; Label field symbol of each NAME directive line for 

every outer procedure to be retrieved. . 
- Function definitions can be obtained from a file through nesting of 

definitions and through externalization (section 5.4). . 
Procedures are stored on the system library by GLIB, the MASTER 
library generation program, and can be placed on some other file through 
use of XFER, the MASTER transfer routine (MASTER Reference Manual). 
They cannot be on an auxiliary library. 
Examples: 

The following procedure definition appears in-a procedure library on 

i$ 
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Procedure P1 is obtained by LIBS as follows: 


| Las. L'psa.!, 


After P1 has been obtained, function names F1 and F2 are defined by 
writing Pl as a command field entry. 


| Ph awe 


A procedure with names A and B is on the system library, «LIB. 


aN 
> 
>. 
€ 


By using the following LIBS directive, both A and B are defined and 
may be referenced. The user needs to specify only the first pro-_ 
cedure name. to obtain the entire definition. 


Li. 2TBS. Lae TB A in: d 


If a user has no use for the A entry name, he can save core during 


assembly by obtaining only the portion of the definition following the 
B entry name. — 


'# 
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5.2 
DEFINITION 


PROCESSING 


60236400 


~When META encounters a procedure or function definition, it compresses 


the lines of code representing the procedure by removing comments and 
redundant blanks, and stores the lines in core. 


Meta-Assembler removes the NAME lines of outer level procedures and 
functions and inserts the labels of these lines into the symbol table. These 


labels are procedure or function entry names, and contain the location of 


the definition and the values of any sets associated with the NAMEs. 


Entry names of inner definitions are not processed. Meta-Assembler 
stores these in the procedure definitions area as part of the lines of code 
comprising the definition. When procedure or function definitions are 
nested, entry points to the inner definitions are not known until the outer 
procedure is referenced. META does not save outer level PROC and 
FUNC lines, but instead creates a PROC or FUNC symbol table entry for 
each such line. . 


When an outer procedure or function is referenced, META processes 


only PROC, FUNC, NAME, and ENDS lines of the next level of procedures 


or functions. Unless the inner procedure name is externalized (section 
5.4) subsequent reference to an inner es may occur only within the 
next outer procedure. _ 


Each procedure and function definition may contain several NAME 
directive lines. The position of a NAME directive determines the first 
line of code to be processed when the procedure is referenced. 


Example: 


Ax. 


| If the procedure is called by name X, the first line of code processed 
is: ; : 


| 


o~-9 


If the procedure is called by name Y, the first line processed is: 


The position of NAME directive lines within a procedure affects LIBS 
directive processing. If the following line is written the entire pro- 
cedure is retrieved from the file. 


: ‘7 


If LIBS is written as below, the only line preceding the NAME line 
with label Y retrieved is the PROC directive line. 


; an 


5.3 
REFERENCING | 


Texel proceds ‘the label"of anyiMAME directivéMfine-tn the 
definition as a pennants The label field can be blank or can ‘contain a 
symbol that is assigned the value of the current location counter. To 

su;.. ly parameters to the procedure, place a set in the operan! field of the 
procedure call line, append a set to the procedure name in the command 
field, or do both. Within the procedure definition, the sets are referred to 
as if they were defined by NSET directives. If set names are provided in 
the command and operand fields of the PROC directive or the operand | 
field of the FUNC directive and the corresponding field of the procedure or 
function reference is blank, the set used consists of one zero element. 


Example: 


NV 


r 


When the aeiiecs is referred to by name ENTER, elements A, B, $, 
[C-3,5] are associated with name JOE as if the following line had been 
written. 
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JOE [1] refers to A, JOE [2] refers to B, JOE [3] refers to the 
value of $ at the time the reference occurs, and JOE [4] consists 
of a subset of two elements, C-3,5. 


set X, Y has set name M and is referred to as if the following line had 
been written. 


M LNSET XY 
Thus | 
JOE [3] = $ 
JOE [4,1] = C-3 
M [(2]= Y 
The label appearing on the PROC directive line assigns a name to the set 


7 in the operand field of the NAME line. In the preceding example, E is the 
set 12,1. | | 


To refer to a function, write the label of a NAME directive appearing in the 
function definition followed by an argument enclosed in parentheses. A 
function reference must include the parentheses. | 


Example: 


RB. 


In the above reference, FU [1] is 15 and FU [2] is 4; A has value 
(15+ 4-1)/4. If the reference had been|CQUOT( ), the set FU 

| would have been a single element set with value of zero and would 
en | , have been illegal because FU [2] is a divisor with value 0. 


Parameters are referenced within a function in exactly the same way as 
r they are referenced within a procedure. 


A reference to a function that returns a value may appear as an operand in 
an expression. Reference to a function that returns a set may appear any- 
where a set name may appear, 
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When a procedure is referred to, META forms as many as three sets in 
the symbol table. The set in the operand field of the procedure reference 
line, the set appearing in the command field of the procedure reference 
line, and the NAME directive set associated with the procedure reference, 


The set in the operand field of the procedure reference line is evaluated 
and entered in the assembler symbol table. Its set name is the symbol 
that appeared in the first operand subfield of the PROC directive line for 
the procedure. The level of definition of the set is one greater than the 
level in effect for the procedure reference line. 


A set appearing in the command field of the procedure reference line is. 
processed in the same manner as the operand field set of the procedure 
reference line. The name of this set is the entry in the second subfield 
of the command field of the PROC directive. 


The NAME directive set associated with the procedure reference is ‘ 
treated differently. At the time of procedure reference, the elements of | 
the NAME directive set are already in the assembler symbol table but have 
no set name. META forms the NAME directive set in the assembler 
symbol table by copying the elements of the NAME directive set from one 
point in the symbol table to another and by assigning them the set name 


_ (the: symbol from the label field of the PROC directive line). The level of 


definition is the same as tor the other two sets previously described. 


When META encounters the ENDS line for the procedure, it removes local 
symbols and sets from the symbol table. Externalized symbols are saved, 


Meta-Assembler processes lines of code between a NAME line and a TREF 
or an ENDS line as if these lines appeared on the source input file. The 
lines are read from core storage rather than from the source input file. 
When there is nesting of definition, it also reads PROC, NAME, and ENDS 
lines from core storage. Again, processing is similar to that for lines 

on the source input file. Information is extracted from the first encountered 
PROC line and all associated NAME lines; other lines are skipped until a | 
corresponding ENDS line. Had these lines been on the source input file, 

the assembler would have saved them. However, since the lines are 
already in core, it is unnecessary to save them again. 
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5.4 
LEVELS AND 


~ LOCAL LABELS 
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META allows nesting of function and procedure. references as well as 


nesting of definitions. A definition can contain a reference to another 
procedure and, within that procedure, there can be a reference to still 
another procedure. Nesting of references, as with nesting of definitions, 
can continue to 14 levels. 


| Meta-Assembler recognizes 16 levels of symbol definition. Symbols 


defined at a given level are always available at the given level and all 
san genial (inner) levels, but cannot be referred to at lower (outer) levels. 


Symbols external to the program é. e., those appearing as operands in an 
EXT directive) are defined at level 0. “Symbols defined in the program but 
outside of procedures or functions are at level one. Symbols defined within 
procedures or functions are at level two or higher, the level being raised 
by one fae each nesting of the reference. 


_ Except for labels of NAME directives, which are available to the next 


outer level, labels within a procedure or function definition are local to the 
procedure or function; they are not available to outer procedures or to the 
program. 


To make a label defined within a procedure or function available outside 


that procedure or function, the programmer can append one or more dollar 
signs to the symbol. Each dollar sign lowers the definition of the symbol 
one level to a minimum level of 1. 


Examples: 
=. P . Define A one level lower. 
“ a Define B two levels lower. 
YE nb Define P[1] one level lower 


(see section 6.5 for SYM). 


Thus, by lowering the procedure level of a symbol definition, the definition 
is available at a lower level outside the procedure or function. 


Example: 


In the following example, procedure C is defined at level 2 when 
referenced by the main program (second line from bottom). Its 
entry name (C) is known at levels 1 and 2. Within C, a call to 
procedure A defines A one level higher (level 3) causing its entry 
name (A) to.be known at levels 2 and 3. Label E is local to pro- 
cedure A, Label Bis known at levels 1, 2, and3. Label Dis 
known at levels 2 and 3. Consequently, labels D and E are not 
known when they are referenced at level 1 by the GEN directive 
following the reference to procedure C. If the reference were to 
A instead of C, A would be defined at level 2 a labels B and 
D available to the GEN directive. 


ia fi 
KD 


A known at levels 3 and 2 
E local to level 3 — 
B known down to level 1 


D known at levels 3 and 2 
B,D, and E all lnown 


C known at levels 2 and 1 


Level 2; E not known 


. Level 1; C known | 
= | 5 f) Level 1; D and E not known | 
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i 6.1 
i RELOCATION 
: (REL) 
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the expression. 


ATTRIBUTE FUNCTIONS | 6 


In the process of assembling source programs, Meta-~Assembler constructs 
tables of information about elements of the source program. Attribute 
functions provide the user with information about expressions and sets. 


' The implicit attribute of a symbol or a set element is its value. Within. 


Meta-Assembler, the value attribute of a symbol is synonymous with the 
symbol; no further notation is needed to obtain that information. 


Example: 


Let A and B be defined as follows: | 


Within META, A*B and 3*4 are identical expressions. 


Attribute functions are used to obtain information about attributes other 
than value. As with a symbolic reference, an attribute function reference 
results in a value. To refer to an attribute function, write the attribute 


name followed by an expression or set enclosed in parentheses. An 
attribute function reference can be an operand in an expression. 


The relocation attribute function, REL, returns value zero if the expression 
within the parentheses is not a value or is an absolute value. If the expres- | 
sion is relocatable relative to a control section origin, REL returns the 
internal location counter designation (1-15) of the control section containing 


Example: 


If A is in control section using location counter 1, go to C. 


Assume the program contains only one program control section and that B is 
an expression in that section. : 


REL(B)= 1 The first program control section is always assigned 
location counter 1. 


REL(15) = 0 The argument is absolute. 


6.2 
MODE 


(MDE) — The mode attribute function, MDE, returns the mode of the argument. 


Mode Type of Expression 


Not a value; for example, a set or function name 
Integer (decimal or octal) value 
Real- or floating-point value 
BCD character string, right adjusted 
BCD decimal integer 
BCD character string, left adjusted 


ASCII character string 


Relocatable word address (includes literals, control 
section names, and special! character $) 


10 External word address 


11 Relocatable byte address 
12 External byte address 


ona on f£ © ND FF © 


Examples: Let A, B, and C be defined as follows. 


D[1] = MDE(A) = 2 
D[2] = MDE(B) = 1 
D[3]= MDE(C) = 4 
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6.3 
NUMBER OF 


ELEMENTS : | _ : » ae | 
(NUM) NUM returns the number of elements in a set. If the symbolic item is not a 
; | - get, NUM returns value 0. | 
Examples: Let A and B be defined as shown. : 
= 8, 
NUM{(A) = 3 | Set A has three elements. 
NUM(A[1]) = 0 A[{1] is a value, not a set. 
NUM(A[3]) = 2 _A[3] is a set of two elements. 
NUM(A[3,1]) = 0 A[3,1] is value 7, not a set. 
NUM(B)= 0 Bis not a set. 
~ NUM(C)= 1 ; Set C has one element (zero). 
The following example tests for number of elements in a set and tests 
elements of a set for subsets. | : 
f | 
o RDEF |. NUM | - | B= 3; /A has 3 elements. 
RPT. 7, if Sie ae Test each elementlof A. 
ATH . NUMCAL: 0 Exit to E for|A{3}. 
o, L | | 
GQaT de 
FZ E = 2; Subset A[3] has 
OPT 2 elements. 
w 
ss Test each element of 
| subset for subset. 
 @& 
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6.4 

SIZE OF DATA 

(SZE) SZE returns either the number of object machine bytes needed to contain 
the value of an expression or the number of characters, depending on the 
mode of the expression. If the item is not a value, SZE returns value 
zero, SZE considers an address to be a one-word value. 


SZE returns values depending on mode. 


Mode Size 
0 Zero 

1 or 2 Number of bytes 

3, 4, 5, | 

or 7 Number of characters 

9, 10, 11 | 

or 12 One word expressed as a byte count 
Examples: 


Let A, B, © D, and-E-be defined as.shown for an object computer 
word size of 24 bits and byte size of 6 bits. 


SZE (A)= 3 | Three characters 


SZE(B)= 8 | Two words or eight bytes 
SZE(C)= 4 One word or four bytes 
SZE(D) = 4 | One word or four bytes 
SZE(E) = 0 | «Elsa set, not a value 
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mt: 


Soon. 


6.5 
SYMBOL 
(SYM) 
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SYM causes the value of the argument expression to be treated as a symbol. 
A SYM attribute function reference can appear in the label, command, or 
operand field. By using SYM, the programmer creates a symbol which 

is the value of the argument expression. The assembler represents the 


symbol as either 24 or 48 bits. 


One use of the SYM attribute function is to refer to a symbol that is other- 


wise illegal. SYM can also be used for symbol concatenation. 


Another use is to move a symbolic parameter into any field of a procedure 
or function. In this way, symbols supplied as parameters can be defined 
within a procedure or function. 


Examples: 


/ Defines AAAA 


Redefine 


BYMC2.B) ane ADEE 2.8 Defines 2.5 


The following example illustrates symbol concatenation. It generates 


symbol XY by scaling parameters X and Y into appropriate bit POSTOne to 
form the value of the argument expression. 


sd 


# - ays. 
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A reference to the symbol Q8Q. XYZ is ordinarily illegal because of the 
decimal point. It can, however, be referred to through use of the SYM 
attribute. | 


A reference to a procedure can be a SYM-defined name 


- ;. Outer procedure 


Procedure has 


pP _ SYM-~defined name 
End inner 
4 procedure 


End definition 
JFR reference 


The above code causes the procedure JFR to be interpreted as if it had | 
been written: | | 


Begin JFR 


End JFR 
Refer to JFR 
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66. | 
WORD ADDRESS 
(WRD) 
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After the inner reference to procedure AB, ‘the EQU line becomes: 


edt. Fou $ 


If the mode of the argument expression is either 9 (word) or 11 (byte), 
WRD returns the value of the argument as a word address. If the mode of 
the argument expression is 12 (external byte address), WRD changes the - 
mode to 10 (external word address). If the mode of the argument expres- 
sion is not 9, 10, 11, or 12, WRD returns the argument expression 
unchanged. If the argument expression is a byte address that does not 
correspond to a word address, truncation occurs. 


Examples: 
|Computer word 6 bits per byte, 
NM four bytes per word. 
& K = f A has mode 11, value 0. 
AA. EQU WK DC A AA has mode 9, value 0. 
4, CESS B has mode 11, value 4. 
MB. OU. . WROC 2 BB has mode 9, value 1. 
KES Chas mode 9, value 2. 
& a MK DA | CC has mode 9, value 2. 
B, & ? D has mode 1, value 10. 
MA» EY MEY CD DD has mode 1, value 10. 
RESS Jf, .,, . Ehas mode 11, value 12. 
PRESB | F has mode 11, value 13. 
F Oo WIRD [FF has mode 9, value 3 truncated. 
XT G has mode 10, value 0. 
Cy IU o ©, GG has mode 12, value 0. 
evo: SVs, MKD Calo GGG has mode 10, value 0. 


6.7 
BYTE ADDRESS 
(BYT) 


If the mode of the argument expression is 9 or 11 (word or byte), BYT 
returns the value of the argument expression as a byte address. If the 
mode of the argument is 10 (external word address), BYT changes the 
mode to 12 (external byte address). If the mode is not 9, 10, ll or 12, © 
BYT returns the argument expression unchanged, 


Examples: 


Computer word 6 bits per 
byte, four bytes per word. 
A has mode 9, value 0. 


AS G BY TGA AA has mode 11, value 0. 
] B has mode 9, value 1. 


BV7CG BB has mode 11, value 4. 

‘ESE U C has mode 11, value 8. 
EQ 5 CC has mode 11, value 8. 

p QU 0 D has mode 1, value 10. 
OD. EG CD DD has mode 1, value 10. 
33. EX Be -Ethas mode.10,. value.Q..* 
Be. COA BY TLE EE has mode 12, value 0. 
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7.1 
~CONTROL CARDS 


60236400 


PROGRAM EXECUTION | 7 


META can be called either by a MASTER task name control card or by a 
task already in execution. 


When called by control card, META is loaded and placed in multipro~ 
grammed execution as soon as its class, core, and file requirements can 
be met. When called by a CALL macro, a copy of META is loaded, if the 
job making the call does not already have a copy of the task. If it has a 
copy, the call is queued; that is, the caller must wait for the existing copy. 
Since META reinitializes itself, a job may make multiple calls to the Meta- 
Assembler. Parameters ordinarily specified on a META control card 
(including parentheses) are passed as secondary parameters of a CALL 
macro, For use of CALL macro, see MASTER Reference Manual. 


When the object deck is to be executed, it must be called by a task name 
control card or another task. The job monitor then calls the loader which 
loads relocatable binary information, links independently assembled sub- 
programs, and loads and links library routines referenced by the loaded 
program, The program then executes multiprogrammed with all other 
active tasks. ~~ 


Assembly of META source programs under MASTER and execution of 


_ 3300/3500 binary object decks require MASTER.contro! cards identifiable 


by a $ in column 1 (except for the end-of-file card). The name of the 
control card followed by any necessary parameters begins in column 2. 
The name and parameters must be contained on an 80-column card, 


MASTER control cards optionally accompanied by source and data decks 
are read serially from the input card reader. Cards required for META 
jobs are described in sections 7.1.1 through 7.1.5. 


A JOB card must appear in a job deck either as the first card or, ifa 


DIRECT card is used, as the second card, 


lige 


7.1.2 
$SCHED 


7-2 


os = fe 0 


Example: 


BCD account number; required _ 

BCD job identifier; required 

Time limit in minutes; optional 
Printer line limit (1-99999); optional 
Punched card limit (0-99999); optional 


fe OB, 639, DJ, 15, 150, 100, COMMENTS 


A SCHED card, immediately follows the JOB card in the job deck and 
provides the system with core and scratch mass storage requirements, 


one CORE =qp,SCR=seg,... 


Oth r SCHED card parameters, not normally required by the META 
assembler, are described in the MASTER Reference Manual. 


CORE=qp 


| Estimate of maximum amount of core, in quarter 


pages, required for assembly or execution, whichever 

has the higher core requirement. The estimate for 

the META assembler is a minimum of 32 quarter pages. 
Add four quarter pages if MASTER mnemonic instruc- 

tion set is required and allow for any other procedures 
or functions. 


If the loader determines that the estimate is below that 
required by the job, the job is terminated with a 
message on the OUT file. 


When the CORE field is omitted, gp is set by 
installation parameter, 
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| SCR= seg 
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Number of segments of mass storage scratch area 
required by the job. The segment size is determined 
when the operating system is installed. 


If the length of a segment is 10,000 words, the file for 
executable output (usually LGO) requires roughly one 
segment for each 400 source statements, Normally, 
LGO needs only one segment. 


META uses at least one and sometimes three system 
scratch files in addition to files indicated on the META 
ecard. All are in standard MASTER blocked format 
with a block size of 1280 characters. META always 
juses a file with the dsi INT for source card images of 
the subprogram being assembled.. The SCR field must 
schedule sufficient segments for this file to contain the 
largest subprogram or a set of subprograms to be 
assembled, 


If the X or F option is requested, META uses a scratch 
file having the dsi BIN. Normally, one segment is 
sufficient; the file contains most of the binary output 
for one subprogram. 


If a cross reference table is requested, META writes 
reference information on a scratch file with the dsi 
INTP. Normally, one segment is sufficient for INTP. 


If the sum of the mass storage requirements indicated 
by the JOB card line and punch limits and the SCR: and 
ABORT requests exceeds the storage reserved for 
these files, the job is not initiated. 


"When the SCR. field is omitted, seg is set to an 


installation parameter. 


$META __. The MASTER task name control card that causes META to be called, loaded, 
and executed (multiprogrammed) has the following format. 


1 x : e a 7 : ; META(pq1;...-,Pn) 
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The optional parameters, p;, are separated by commas and may appear in 


any order within the parentheses. Parameters have the format: 


assembly option = dsi 
or 


assembly option 


The assembly options are character strings, beginning with I, L, X, F, P, 
or R. The dsi's are MASTER data set identifiers of 1-4 alphanumeric char- 


acters; 0000 may not be used for a dsi. 


The options, and the data set identifier assigned for each if none is given on 


the META card, are listed below: 


Option Significance dsi 
I Source input INP 
L Listable output OUT 
x Load-and-go output LGO — 
F Load-and-go output with . 
forced execution LGO 
Pp Punchable output PUN 
R Cross reference table Same dsi as for L 
(selectable only in con- 
junction with L) 


The X and F options are mutually exclusive. If the X option is used and 
assembly errors occur, META issues a SUPPRESS request (MASTER 
Reference Manual) so that the object program is not executed. Under the . 
X option, assembly errors do not prevent generation of the executable out- 
put, just its loading and execution in the same job. The F option causes 
execution of the 3300/3500 object program despite assembly errors. 


The Meta-Assembler source deck can be on the standard input card reader 
(INP) or a file, such as a magnetic tape file, specified by the programmer. 
If it is on the card reader, the MASTER input preprocessor transfers the 
deck from the card reader to the INP file. The programmer has the option 
of bypassing this transfer by placing a DIRECT card in front of his deck. 


MASTER either accumulates Meta-Assembler printer output on the mass 
storage standard output file (OUT) for automatic post-job processing, prints 
output directly during job execution, or places the output on some other file 


specified by the user and for which printing is not automatic. 
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Similarly, MASTER either accumulates Meta~Assembler binary output on a 
punch file (PUN) for automatic post-job punching, punches output directly 
during job execution, or places the output on some other file specified for 
the user and for which punching is not automatic. ° 


For all output options, META assigns a system scratch file if the user does 
not specify either a standard file (QUT, PUN, or LGO) or a permanent file. 
All scratch files are automatically released at job end. The SCR parameter 
on the SCHED card must allow for all scratch files.. 


Use of permanent files is described in the MASTER Reference Manual. 


Example: 


heats XCUTE, PUNCH) 


META is loaded from MASTER library file *LIB. Source statements 
are read by META from the INP file. Statements and assembly list- 
ings are written on the job OUT file and automatically printed. The 
punchable output is written on the job PUN file and automatically 
punched. Executable output is written on the LGO file. : 


haat (IN-SRCE, LIST=OUT , FORSX=GOGO) 


META is loaded from MASTER library file *LIB. It reads source 
statements from file SRCE. Printer output goes to the OUT file and 
is automatically printed. The job does not have any punch output. - 
Executable output goes to user file GOGO. Because of the F option, 
the program on GOGO can be loaded and executed despite errors. 
occurring during assembly. 


7.1.4 . 
TASK NAME A task name control card directs MASTER to call and load the object-time 
« program from the specified file and to begin execution of the task. 


If the object-time program is to be executed following assembly, a task 


name card of the following form must follow the source deck (if it is on the 
standard input file) or the META card (if the source deck is elsewhere). 
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$name, dsi 


name 1-4 alphanumeric characters; name is required. 


dsi dsi of an opened file from which the named task is to be 
loaded. When the dsi is zero or the field is omitted, 
MASTER looks for the task on the system library. Nor- 
mally, dsi is LGO. 


For execution of a previously assembled program, the task name card for 
the object deck immediately follows the SCHED card. The object deck fol- 
lows the task name card or is on the named file. 


7.1.5 
END-OF-FILE A job is terminated with an end-of-file card characterized by 7,8 punches in 


columns one and two. Columns 3-80 may contain comments. 


88 END OF FILE 

i Ee | 
a a 
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7.2 
SAMPLE DECKS 
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The following sample deck structures illustrate the use of MASTER control 


cards in job decks. 


Assemble, list, and execute 


MASTER loads 

assembled pro- 
gram from LGO 
file and executes it 


$MTAP, LGO 


(SOURCE SUBPROGRAMS) 
$META(LIST, XCUTE, PUNCH) 
$SCHED, CORE=32, SCR=10 


$JOB, 73, JOB2, 10, 5000, 1000 


7-8 


Assemble and list 


$META(I=SRCE, L, X=BEN, R) 
$*DEF(U, W, BEN, 607,,,,,0) 


$*DEF(U, W,SRCE, 607) 


$SCHED, CORE=35, SCR=10, 607=2 


$JOB, 32EB, 160A,5 


This job does not|include execution of an object deck because the source pro- 
gram on file SRCE contains a UNIT directive describing a computer system 
other than the 3300 or 3500. Output is to permanent file BEN. In this exam-~ 
ple, SRCE and BEN are on magnetic tape. For use of 607 parameter on 
SCHED card and for use of *DEF cards, refer to the MASTER Reference 
Manual. 
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' ‘Execute only | 


$PROG, INP 


$SCHED, CORE=12,SCR=2 


$JOB, 6178, JOBX, 3 


Binary object 
program begins 
with IDC and ends 
with ELD. 


This example illustrates execution of a 3300/3500 deck assembled 
previously by META. ity. od aoe 
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List only 


(META SOURCE SUBPROGRAMS) 


$SCHED, CORE=32, SCR=10 


$JOB, 71568,SMITH, 10, 1000 


This job assembles the source deck but produces only a listing as output. 
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MESSAGES | 8 


8.1 


° 


LIST FORMAT When the L option is selected on the META control card, META generates 


list output. Each page of list output is in the following format: 


META/MASTER  VERn.n |title (optional) date PAGE 


source word address object computer source 


= ¢ 
statement a | word . statement 
~~ a: 
number > 8 
7) 10 
ois Lio 
oy rs) = 
3/2 Al g 
ae BS) s 
alo Slo 
ale Abs 
title 


date 


source statement number 
error code 

relocation section 

word address , 


byte position 


operand relocation 


Object computer word 


source statement 


60236400 


Characters supplied by TITLE directive. 
Date of computer run. 


Position of source statement in the source 
deck (00000-99999). 


Code if source statement is erroneous 
(section 8.2). 


Control section (00-15) containing object com- 


~~ puter word. 


Address of object computer word. 


On byte-oriented source lines, position of byte 
in word from left to right. 00-n, respectively, 
where n is the number of bytes per word. 


Control section (00-15) containing operand; X 
indicates operand is external symbol. 


Object computer word generated by META (3-16 - 
octal digits). 


1-80 characters of source input line, including 
sequence number if provided. 


Example: 


META/MASTER VER 1.0 
00001 017 00000000 


META/’ 
0000 


MASTER VER 1.0 
3 or 


FUNCTION DIRECTIVE TEST 


01 01000000 
14100000 
14000014 

Ot 14600034 
04100030 

01 14600042 

01 00700024 

* 34200000 

OT 144609050 
04200060 

01 14600056 

01 00700024 


14300000 
74000000 
01 14600064 
04300036 
01 14600072 


01 00700024 
03 01400006 


01 01000024 


09/06/68 
L¥*L16¢, IDENT 
FVETAY 


09/06/68 
PFUNCTION DIRECTIVE TEST# 


site + S2{2) © (S2f1] + $23), siti] 


0,1 
FUNT(1,2,3) 
Ti 

24.1 

TIF’ 
RESULT 

0,2 
Fun2(3,1,5) 


32 


Set} WSET 
ENT 


ENDS $1{2] + S2[2] 
tnd 


48,2 
Ter 
RESULT 


2,0,3 
0,3 


* (s2{t} + S2{3}), Sift} 
FUN3(SET1) 


T3 
30,3 
T3F 
RESULT 
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8.2 
ERROR CODES ' Meta-Assembler flags each detected error with a single-character error 
° code and 3 asterisks on the line of the source. statement in error. 

Code Meaning 

Crt Common error. An attempt was made to assemble information 
into numbered common. 

DFt* Double definition. 1) A symbol has two values at the same level, 
or 2) A subprogram that does not contain a UNIT directive con- 
tains more than one SECP directive. - 

E*** Expression error. The expression is syntactically correct, but 

an error, such as an illegal combination of modes, exists. 

Fr** Forward reference error. A forward reference appeared in an 
expression which must be evaluatable. 

[*** Illegal instruction. The command field contains a symbol that 
is neither a directive nor the name of a procedure or FORM. 
The command field contains a misplaced directive. 

N*** Nesting error. More than 14 procedure levels or six RPT nests 
were encountered, or an RPT, procedure, or function is im- 
properly nested. 

R*** Relocation error. The relocation associated with an expression 
is neither absolute, nor singularly positive, nor singularly 
negative, nor an external plus or minus a constant. , 

§*** Syntax error. The syntax is unrecognizable or illegal. For 

example, a symbol has more than 12 characters... 

OY is ‘Truncation error caused by 1) A value larger than the receiving 
field can accept. Note: No error is flagged when all the | 
truncated bits are the same as the most significant bit (sign) 
of the value placed in the field. 2) A word-oriented statement 
following a byte-oriented statement. 3) Mixing of word- 
oriented and byte-oriented operations. 

U*** Undefined symbol. An operand contains a reference to a symbol > 

7 that is neither defined in the program nor declared as external. 
% 
: ¥ 
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8.3 

SUPPLEMENTARY 

INFORMATION Following the source program listing, META provides supplementary infor- 
mation as a standard part of the Meta-Assembler output listing. The supple- 

mentary information is identified as follows: . 

Message Meanin 

LITERALS Identifies the list of literals. The loca- 
tion and control section designator (0-15) 
are given for each literal. 

CONTROL SECTIONS Begins new page. Identifies list of con- 
trol section names, octal length of section 
in words, and location counter designator | 
(0-15). Each entry in the list begins 
with SECA, SECP, or SECD, indicating - 
the type of control section. 

EXTERNAL SYMBOLS Identifies the list of external symbols. 

ENTRY-POINT SYMBOLS Identifies the list of entry-point symbols. 

UNDEFINED SYMBOLS Identifies the list of undefined symbols. 

MULTIPLY-DEFINED SYMBOLS Identifies the list of multiply—defined 
symbols. 

FIRST 25 ERROR LINES Identifies line numbers of first 25 lines 
flagged with error codes. If the line in 
error is not a source input line and 
thus has no line number, the number of 
the most recently encountered input line 
is used. 

NUMBER OF LINES WITH Identifies count of the number of lines 

‘DIAGNOSTICS flagged with error codes. 

Example: 

CONTROL SECTIONS 
SECP REAL 114 1 
EXTERNAL SYMBOLS 
UIC 
ENTRY-POINT SYMBOLS 
SSSSSSS 
UNDEFINED SYMBOLS 
MULTIPLY-DEFINED SYMBOLS 
FIRST 25 ERROR LINES 
10 11 15 16  —«d‘*B 
NUMBER OF LINES WITH DIAGNOSTICS 00013 
8-4 
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8.4 


CROSS REFERENCE 


TABLE 


8.5. 
MESSAGES 
ON OUT 


60236400 


META provides the cross reference table if the R option is selected on the _ 
META control card. - If both R and L options are selected, the table follows 
supplementary information. This table is identified by the title: 


CROSS REFERENCE TABLE 


- ‘The first column gives the address of the directive defining the symbol 


given in the second column. Addresses of references to the symbol are in 


the remaining columns. 


Example: 
CROSS REFERENCE TABLE 
15 A 
14 B 
] GENT -] 


After detecting an error, META writes one of the following messages on the 


OUT file for the job. 


Message — Cause 
**META request ERROR ’  _Input/output error occurred: If other than 
code DSI dsi LINE line read error (PICK reject code 04000000 or 


050xxxxx), run is abnormally terminated. 
Message appears as voluntary abort code 
on accounting information as well as in 


listing. 

request - Blocker/deblocker or system 
OCARE request name 

code Reject code for request: 

(Q) for blocker/deblocker 

(A) for system OCARE 

dsi _ Data set identifier for request 

line ; Number of META source in- 


put line 
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**META BAD LIBRARY 


**META FINIS GENERATED 


**META ILLEGAL 
$META CARD 


**META $SCHED MORE 
CORE 


Examples: 


The overlays of META are not in task 
directory. Library generation is incorrect. 
The run is abnormally terminated and mes- 
sage also appears as voluntary abort code. 


FINIS directive generated because of end- 
of-file condition encountered on source input 
file. Execution continues. 


$META card contains illegal parameter such 
as illegal option or data set identifier. The 
run is abnormally terminated and message 
also appears as voluntary abort code. 


Request for additional core rejected. The 
run is abnormally terminated and message 
also appears as voluntary abort code. Re- 
submit job with more core specified on 
$SCHED card. 


**META SEXPAND ERROR 30000000 DSI INT LINE 10422 


**META PICK ERROR 05000000 DSI INP LINE 00012 
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APPENDIX SECTION 


CHARACTER SET 


Type of 
Character 


Alphabetic 


Numeric 


60236400 


501| 
Printer 


Graphic 


CHIAHARONHMONKH EM AIHAMOVOZEZEAMM BANE OA P 


Internal 


Code Octal 


A-1 


501 
Type of Printer Internal Card 
Character Graphic Code Octal _ Code 
Blank blank : 60 ‘space 
+ plus 20 12 
- minus : 40 11 
* times 54 11,4,8 
/ divide 61 0,1 
= equals 13 3,8 
< less than 32 12,0 
> greater than 57 11,7,8 
period 33 12,3,8 
; comma 73 0,3,8 
( left parenthesis 14 0,4,8 
) right parenthesis 34 12,4,8 
% percent 16 6,8 
Special $ dollar . 53 11,3,8 
# not equal (apostrophe on keypunch) _ 14 4,8 
< less or equal 15 5,8 
= greater or equal 35° 12,5,8 
{ left bracket 1? 7,8 
] right bracket | > 72 0,8,2 a 
} decimal exponent 55 11,5,8 
| binary exponent 56 11,6,8 : 
4 NOT «36 12,6,8 
: semicolon — sy A . 12,7,8 
— right arrow 75 0,5,8 ~ 
l= identity 76 0,6,8 
: colon 12 2,8 
v OR . «52 11,0 
A AND 717 0,7,8 
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-BCD/ASCI Conversion Table 


TABLE A-1. 


Binary Status of ASCII Character 


bit positions 


Character 


*ASCII bit 7 is unassigned and 0 for all codes. 


& 


A-3 
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BCD/ASCI Conversion Table 


TABLE A-1. 


Binary Status of ASCII Character 


(bit positions 


Character 


*ASCII bit 7 is unassigned and 0 for all codes. 


60236400 
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3300/3500 MNEMONIC INSTRUCTIONS B 


A 3300/3500 META mnemonic instruction is a procedure reference in which the label field 
optionally contains a symbolic address, the command field contains a mnemonic instruction and 
modifiers, and the operand field contains operands that depend on the mnemonic, 


META assembles 3300/3500 mnemonic instructions through the use of three standard sets of 
procedures on the system library. The sets are identified through their primary entry names as 
IDENT, MONITOR, and BDP. 


IDENT 


IDENT includes procedures for the 3300/3500 mnemonic instructions executable in program state, 
for the HLT instruction, and for the following 3300,'3000 COMPASS/MASTER pseudo instructions. 


IDENT 8 
BSS 

BSS, C 

DEC 

DECD 


Capabilities paralleling those provided by the following pseudo instructions are available through 
Meta-Assembler directives (Chapter 4). 


END NOLIST 
FINIS LIST 
ENTRY EJECT 
EXT TITLE 
EQU 


Of these, TITLE is the only directive that does not correspond to the COMPASS psuedo instruction. 


META does not recognize the following 3300/3500 COMPASS/MASTER pseudo instructions. 


REM IFZ IFF BCD, C 
COMMON PRG IFN ENDM 
OCT ORGR DATA —LIBM 

_ VFD BCD EQU,C ‘SPACE 
IFT _ MACRO 
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MONITOR 


MONITOR includes procedures for assembling 3300/3500 mnemonic instructions executable in the 
monitor state only. 


BDP 


BDP provides for assembly of 3300/3500 BDP instructions only. 


USE OF LIBS 


Before they can be used, the 3300/3500 mnemonic instruction procedures must be obtained from the 
library through use of the LIBS directive. 


Examples: 
she) ' B'. Ty EN Program state instructions 
GC 'wi7B', TOENT,, BOF All but monitor state instructions 
BS. B.! TOENT,, MONITOR All but BDP instructions 
; » 
MASTER PROGRAM TASK \ 


A META-Assembler program to be executed as a task under the MASTER multiprogramming 
operating system must include a copy of the user interrupt control routine (UIC) that provides the 
task with an entrance and an exit. Each subprogram must begin with a LIBS directive. 


When loading and execution of the assembled output is called for by the task name card (section — 
7.1.4), the call connects with the UIC routine which contains a return jump to the task primary 
entry point. The return address is inserted into the operand field for the UJP as a normal 
function of a return jump execution. To obtain a copy of UIC, the program must declare UIC as 


an external symbol. 
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Example: 


BS er p,! DEAT Call for library procedures. 
DEN Li d¢e! First subprogram named JOE. 
ENTRY, . STAR il 
STARK. U TF 0 START is the task primary entry 
DA | point. 
® 
@ 
9 Ar 
y fi ay. 
ND. 1.1 START 11114. a 
me. y ye Q/ DENT, : Begin second subprogram named XY. 
| i : 
i A A} 
f 
As 
4 5 oO 
SNA 
PLAN. 


PROCEDURE SETS 


Three tables present brief descriptions of procedure references and resultant object code assembled 
by the IDENT, MONITOR, and BDP procedure sets. For a complete description of the actual 
machine instructions, refer to the 3300 or 3500 Computer System Reference Manual. 


Because the 3300/3500 instructions are assembled through procedures, operation code modifiers 
must be defined as symbols having values. A reference to each of the sets IDENT, MONITOR, 
and BDP, causes the symbols for operation code modifiers to be defined. No other definition 
can:be given these symbols, Thus, a group of words is reserved for each set of procedures. 


The following list of terms defines modifiers, operands, registers, and nonstandard symbols 
that appear in the tables. 


In some instructions, the execution address m or r, or the shift count k may be modified by adding 
to them the contents of an index register, B>, The 2-bit designator b specifies which of the three 
index registers is to be used. Symbols representing the respective modified quantities are M, R, 


and K. 
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Term 


ch 


cm 


de 


EQ 
GE 


Meaning 


MONITOR operation modifier: Conversion (alter the characters 
transmitted). 
Other; 24-bit A register or word count control for INAC, and INAW, 


The b subfield designates an index register. The b subfield may be 
represented by a digit; a symbol; or an expression with a nonrelocatable 
value of 1 2, or 3, 


MONITOR operation|modifier: Backward read or write. 
Other: Index register defined by BP, 


Index register flag, M= m+(By) for these instructions only.. 


Index register flag. If Bp= 1 or 3, R= r+ (By. If B.= 2, R= r+ (B2), 
If B,= 0, R=r. 


Index register flag. If B,= 1 or 3, S= s+ (B), If Bg = 2, S= st (B), 
If Bg = 0, S=s, 


IDENT operation modifier: Evaluate address expression |modulo 217-1 


00-77g BCD code of search character. The c address subfield may contain 
any symbol value, or expression, that represents the 6-bit character code 
of the character for which the search is made, 00<c=77g. 


Channel designator for input/ouiput instruction, Tie ch address subfield 
may contain a symbol, value, or expression that results in a nonrelo- 
catable value 0< ch= 7. 


8-bit channel.mask. This address subfield may contain a symbol, 
constant, or expression that results in a nonrelocatable value 0< cm< 2°-1. 


D register 


BDP operation modifier: Indicates delimiting character; represented as 


. right-adjusted BCD character string (mode 3). 


Examples: 


Delimiting character is K. 
V has mode 8. 
Delimiting character is V. 


48|-bit E register. 

IDENT and BDP operation modifier: Indicates equal. 

IDENT operation modifier: Indicates greater than or equal. 
MONITOR operation modifier: Indicates half assembly or disassembly. 
BDP operation modifier: Indicates (BCR 01g jump condition, 
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Term 
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INT 


RL 
RNI 


sc 


Meanin 


IDENT operation modifier: Indicates indirect addressing. 


Increment or decrement. The i address subfield may contain a symbol, 
constant, or expression which results in a nonrelocatable value from 
0 to 7. 


MONITOR operation modifier: Indicates interrupt on completion. 
Shift count 


Field length of block. 0-177g. The £ address subfield may be a symbol 
or an expression which results in a nonrelocatable value from 1 to 177g. 


BDP operation modifier: Indicates (BCR) 105 jump condition, 
BDP operation modifier: Indicates left-to-right scan. 

IDENT operation modifier: Indicates less than. 

Number of characters in field R. 

Number of characters in field S. 


15-bit word address, first operand, or jump address. The m address 
subfield may contain a symbol, $, a constant, an expression, or a 
literal, 


Actual operand or jump address as modified; M= m+ (BP), 

MONITOR operation modifier: Indicates no assembly or disassembly. 
Same as m, second operand address. 

IDENT and BDP operation modifier: Indicates not equal. 

15 (or 17)-bit P register. . 

24-bit Q register. 

17-bit character address. The r address subfield may contain a symbol, 
literal, constant, external symbol, expression, or $. 

Actual character address as modified; R = r+ (B>). 

BDP operation modifier: Indicates right-to-left scan. 


Abbreviation for read next instruction at. For example, RNI P+1 means 
read the next instruction at the current location plus 1 of the P register. 


Same as r, second operand address. 


IDENT operation modifier: Sign extension if S present; no sign extension 
if S omitted. 


Other: Same as R, second operand address; S= s+ (B), 


Scan character 


6-bit address in register file. The v address subfield may contain a 
symbol, constant, or expression which results in a nonrelocatable value 
0 to 6349. 


Term | Meaning 


Ww Page index file address. 

x Connect code or interrupt mask. The x address subfield may contain a 
symbol, constant, or expression that results in a nonrelocatable value 
O< xs 212.1, 

y 15-bit operand. The y address subfield may contain a symbol, * or **, 
constant, an expression, or a literal. 

ZRO : BDP operation modifier: Indicates (BCR}0 jump condition. — 


() Operation analysis symbol indicating the contents of. For example, 
(A) means the contents of the A register. 


ap Operation analysis symbol indicating replace. For example, (M}-(A) 
means replace the contents of the A register with the contents of the M 
operand field. 


Procedures for COMPASS pseudo instructions precede the tables. 
IDENT procedures are grouped according to instruction types as: 


Transfers ... , 
Arithmetic operations 
Character operations ; 


Decisions 


er 


Jumps, pauses, and stops 
Interrupt operations 


No-operation instruction 
Shift instructions 


Logical instructions 
MONITOR procedures are grouped according to instruction types as: 


Transfers 
Decisions 


Jumps, pauses, and stops 


Input/output operations 


Interrupt operations 


BDP procedures are not divided into subgroups. 
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PROCEDURE REFERENCES FOR COMPASS PSEUDO INSTRUCTIONS 


IDENT 


BSS 


60236400 


sym 


The IDENT procedure names a subprogram and provides control 
information for META. The operand field contains a 1-8 character 
symbol naming the subprogram. The procedure contains a SECP 
directive that places the name on the IDC card of the relocatable 
object subprogram deck. The label field is defined as the value of 
the location counter, 


The subprogram name is not an entry point name and cannot be 
referred to within the source subprogram. Each subprogram must 
have a SECP directive or IDENT instruction preceding all but the 
LIBS, UNIT, or list control directives. 


Lines of code following IDENT are assembled, using the location 
control counter, until the next SECP, SECA, SECD, or ORG directive. 


BSS reserves and labels a block of words in any area. The label field 
is blank or contains a symbol defined as the 15-bit relocatable word 
address of the first word in the block. 


The operand field specifies the number of words to be reserved. It 
must contain a constant, a symbol, or an address expression that 
results in a nonrelocatable value. 


Example: 


ene . A650. 


ania 


A double asterisk is illegal in the operand field. A symbol in the 
operand field must be defined in the label field of a preceding instruction. 


A negative operand field such as -O '2' is interpreted as O'77777775'. 
META reserves TTTTTT75g words. 


If the operand field is in error or is zero, no storage is reserved but 
the label field symbol is defined. If the operand field is zero, anda 
byte-oriented instruction immediately precedes the BSS, the next 
instruction that uses space begins with a new word. 


BSS, C m 


DEC dj,do, Kare dy, 


DECD dy,d9,--+»4y 
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BSS, C reserves and labels a block of bytes. The label field is blank 
or contains a symbol defined as a 17-bit relocatable address of the 
first byte (BCD character position) in the block to be reserved. The 
operand field specifies the number of bytes reserved. It must contain 
a constant, a symbol, or an address expression that results in a non- 
relocatable value.. . ; 


A negative operand field such as -O '2' is interpreted as 0'77777775'. 
META reserves 77777775 bytes. 


A zero operand does not reserve space but the label field symbol is 
defined. 


Example: 


Bits 


18 
ABLE+1 


25 


ABLE + 24 AQ (al il 


DEC generates one computer word for each decimal value in the operand 
field. The label field is blank or contains a symbol defined as a 15-bit 
relocatable address of the first word generated. The operand field 
contains values, symbols, or expressions that result in decimal values. — 


Example: 


Generates three words. 


' DECD generates two computer words in 48-bit internal floating-point 
- format for each real (floating-point) value in the operand field. The 


label field is blank or contains a symbol defined as the 15-bit relocatable 
address of the first word generated. The operand field contains values, 
symbols, or expressions that result in real or floating-point values. 
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TABLE B-1. IDENT PROCEDURE REFERENCES 


Command Operand 
Field Field > Operation Object Code 


25 17 14 00 


23 


23 17 14 00 


3 17 14 00 


0 


b, 
a 
a 
S 
= 
iu 
eH 


0-> (A) 7 then y~A14_-00 ; 
sign extended 


o—B?, then y—B?; becomes 
a no-operation instruction if [ 
b= 0 


0-—-Q, then y-Q, 4-00 
0—Q, then Y-Q14-00> 
sign extended 


(E47_24)-A 


Complement of (M)--A 


60236400 a7 - B-9 


el 
m 
n 
a 
ta 
fo 
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Command 
Field 


TABLE B-1. 


Operation 


Complement of (M)—A; 
complement of (M+1)--Q 
(M)--A 


(M)--A, (M+1)--Q 


(My4-99)-B? 


(Q)-E23_99 
Relocate to instruction state 


Relocate to operand state 


(A)-M, Q)-M+tl 


(B)-My 4 99 


IDENT PROCEDURE REFERENCES 


Object Code 


23 Mol [ 
23 17 14 -__ 00 


23 ” } 


17 14 00 


17 14 
fa bf. Tf 


17 14 


(=| GZ, 


17 14 


[tZZ&,Z 
ictZZ, 


23 17 14 00 


il 14 00 


23 17 14 : 00 


a7 pp] om 
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ft 
D 
Cond 
n 
ad 
fr 
& 
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Operation 


(Ay4-00)-! 14-00 


(Ay4-00)--B?; becomes a no~ 
operation instruction if b=0 


(A)--v 


if b=0, 0--(A) 


by _, 
(BV 44-00: 


A 


(Y74-00 


b 
V4 4-008 


(v)-Q 


23. 


TABLE B-1. IDENT PROCEDURE REFERENCES 


Object Code 


EB 
nN 
ae 
iid) 


iv) 
rary 
a) 
=" 
re 


SS 


23. 17:14 11 
Z 
8 bole YY 
(171411 05 ~~ 0 
Vv 


8 My] YY 
23 17 14 11 05___00 
17.14 11 05 _00 
tn ee 


3 17 14 11 05 
Av 
53 (Z 1 


| 
NS 
“Fe 


i) 
o 
oO 


p 
? 


| 
a 
foo) 
on 


wi * 
R = 
\\ 
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TABLE B-1. IDENT PROCEDURE REFERENCES 


Command Operand 
Field Field Operation Object Code 


(A)+ (M)—+-A 23. «17:«14 
(= 


(A, Q)+(M, M+1)—A,Q 17 14 00 
ce 3 ae 


(A)+(B>)--A, sign of (By is 17 14 11 


extended prior to addition t= os aa 


(A)+(Q)-A 17 14 11 


= | |  eaFZ® 


(A,Q)/(M)—-A, remainder —-Q 23 «17 14 00 


a 
9 
§ 
=| 
& 
< 


(A,Q, E)/(M, M+1)--A,Q, 

remainder with sig.i extended 

—E 

Floating-point addition of 23 17 14 


0 
mardi aamne | lw fel = 


Floating-point division of (A,Q)} [23 17 14 


0 
with sign extended —(E) 
Floating-point multiplication of 23 17 14 00 
waatonaea-ne | |e fpf = 


Floating-point subtraction of 23 17 14 00 


(M, M+1) from (A,Q)—-A,Q a bbl om 
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TABLE B-1. IDENT PROCEDURE REFERENCES 


Operand 
Field Operation = Object Code 


(A)+(B>)+B°, sign of BP is 23 17 14 11 


extended prior to addition SM} 


Increase (A) by y 


Increase (A) by y, sign of y is 
extended 


Increase (BP) by y, signs of y 
and B~ extended; becomes a 
no-operation if b=0 


YY Increase (Q) by y 


Increase (Q) by y, sign of y 
extended 


o 
ar 
® 
E 
om 
$4 
< 


(A)*(M)--Q,A 

(A,Q)*(M, M+1)~A,Q,E 
(M)+(A)--M 

(A) - (M)-A 


(A, Q) - (M, Mt+1)--A,Q 
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TABLE B-1. IDENT PROCEDURE REFERENCES 


iF 

y | Command Operand . 

p Field Field Operation Object Code 
e 


98: Ag 00 


ECHA r 0—-A, then character address 
r—A16_00 


ECHA,S r 0—-(A), then character address 
r—A1 6 gg: sign extended 


LACH r,1 0-A, character in (R)-Ags_o9 


LQCH r,2 0—-Q, character in (R)-Qo5_ 09 


Character 


SACH r,2 Character in (Ags_o9) 7 R 


SCHA,I m,b Character address in (A 


—M 6-00 


16-00) 


SQCH | r,1 Character in (Qg5_99)—-R, 
use (B4) to index 


AQJ, mod If condition is satisfied, RNI m, 


otherwise, RNI P+1 


mod test condition 


j 
EQ (A) = Q) 0 
NE (A) # Q) 1 
GE (A) = (Q) 2 
LT —— (A) < Q) 3 


Decision 
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TABLE B-1. IDENT PROCEDURE REFERENCES 


Command Operand 
Field Field Operation Object Code 


If y = (Ay4_99) RNI P+ 2, 
otherwise, RNI P+1 


If y -_ (A14-00)> RNI P+2, 
otherwise, RNI P+1, sign 
of y is extended 


If (A) =y, RNI P+2, other- 
wise, RNI P+1l 


If (A) =y, RNI P+2, other- 
wise, RNI P+1, sign of y 
is extended 


If condition is satisfied, RNI 
m, otherwise, RNI P+1l 


mod test condition ag 


fam 
oO 
om 
n 
ort 
oO 
o 
R 


EQ (A) = 0 


: Positive zero = negative zero 
NE (A) <0 I 

2 

3 


GE (A) = 0 : we 
Negative zero < positive zero 


LT (A) < 0 


if (B>) =0, RNI P+1; if (BP) 

#0, (Bb) -1-- BP, RNI 

-‘m; becomes a no-operation 
| instruction if b=0 


if (BP) = 0, RNI P+1; if (BP) 
~0, (Bb) +1— BP, RNI 
m; becomes no-operation 
instruction if b=0 


For b <0, if (BP) =y, clear 
B and RNI P+2; if (BP) xy, 
(Bo) - 1 pb, RNI P+ 


For b=0, ify = 0, RNI P+2; 
ify =0, RNI P+1 
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TABLE B-1. IDENT PROCEDURE REFERENCES 


Command Operand 
Field Field "Sepanauien Object Code 


For b ~0, ify = (BP ), RNI P+2, 17 14° 00 
otherwise, RNI P+1 


CDM 


For b=0, if y = 0, RNI P+2, 
otherwise, RNI P+1 


For b «0, if (BP) =y, RNI P+2, 
otherwise, RNI P+1 


For b=0, if y =>0, RNI P+2, 
otherwise, RNI P+1 


23 17.14 00 


2 | a em 


For b ~0, if (B>) = =y, clear BD 


and RNI P+2; if (B>) zy, (BP) +1 
—B”, RNI P+1 


For b=0, if y = 0, RNI P+2; 
if y #0, RNI P+1 


(B!) - i— B!; if (BY) negative, | [23 17_14 00 
RNI Pp+1; if (B}) positive, test 
(A) = logical product of (Q) and |’ 

(M);.if true, RNI ++2, if false, 
repeat sequence 


. Decision 


Designator Decrement 
i Interval 


ON OO Ph OO ND 
OCNOh OD 


(B?) -i- oie if (B?) negative, 
RNI P+1, if (B%) positive, test or {if om 
(A) = logical product of (Q) 

and (M); if true, RNI P+2; if 


false, repeat sequence; designa- 
tion table same as for MEQ 
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Command 
Field 


Decision 


ii 
2. 
8 
n 
Oo 
= 
a 
wy 
o 
2) 
3 
a 
Ay 
wo 
2. 
3 
5 


Interrupt Operations 


60236400 


Operation 


If y = (Q14-09): RNI P+2, 
otherwise, RNI P+1 


If y= (Q), RNI P+2, other- 
wise, RNI P+1, sign of y is 
extended 


otherwise, RNI P+1 


If (Q) =y, RNI P+2, other- 
wise, RNI P+1, sign of y 
is extended 


Unconditional stop, RNI m 


upon restarting 


(P)+1—-m 14-00: RNI m+ 1 


If SELECT JUMP j (where j 
= 1-6) is set, jump to m; 
otherwise, RNI P+ 1 


Unconditional jump to M 
Disable interrupt control 


Interrupt control enabled; 
allows one more instruction 
to be executed before inter- 
rupt 


TABLE B-1. IDENT PROCEDURE REFERENCES 


Object Code 


= 
| 


El 


pus 
~j 


ray 
~~ [~“ 


~J 


ia 


: 


B-17 


Wo? 


TABLE B-1. IDENT PROCEDURE REFERENCES 


No operation (assembled NOP), 
RNI P+1 


No-operation 


Shift (A, Q) left end around until 
upper 2 bits of A are unequal; 
residue K = k- shift count; if 
b=1, 2, or 3, K— BD; ifb=0, 
K is discarded 


Shift (A); shift count K=k + (B>) 
(signs of k and pb extended); if 
bit 23 of K=1, shift right; com- 
plement of lower 6 bits equals 
shift magnitude; if bit 23 of K=0, 
shift left; lower 6 bits equal shift 
magnitude; ieft shifts end 
around; right shifts end off 


Shift (A, Q) as or? register; shift 
count K=k + (BP ) (signs of k and 
B extended); if bit 23 of K=1, 
shift right and complement of 
lower 6 bits equals shift magni- 
tude; if bit 23 of K=0, shift 

left and lower 6 bits equal shift 
magnitude; left shifts end around; 
right shifts end off 


Shift Instructions 


Shift (Q); shift count K=k + (BP) 
(signs of k and BD extended); if 
bit 23 of K=1, shift right, com- 
plement of lower 6 bits equals 

shift magnitude; if bit 23 of K = 0, 
shift left, lower 6 bits equal shift 
magnitude; left shifts end around; 
right shifts end off 
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TABLE B-1. IDENT PROCEDURE REFERENCES 


T | 

y Command Operand 

p Field Field Operation Object Code 
e 


rm 
=~J 
jaa 
> 


SSH m Test sign of (m), shift (m) left 
one place, end around and re- 
place in storage; negative sign, 


RNI P+2, otherwise RNI P+1 


Shift Instructions 


~ 
i~] 


Logical product (AND) of y and 
(A)-A 


bo 

[e) 
bs 
~] 


Logical product (AND) of y and 
(A)-+A, sign of y extended 


fut 


Logical product (AND) of y and 
(B>)—B>; becomes no-operation 
instruction if b=0 


A 
~] 

=m 
cal 


a 
~J 


Logical product (AND) of y and 
(Q)-Q 


—_ 
J 


bp 


Logical product (AND) of y and 
(Q)--Q, sign of y extendeu 


Logical product (AND) of (M) 
and (Q)—-A 


Tw) 
oo 
| tee 
~] 
—" 
nN 
o 
o 


to 
~ 


Logical Instructions 


nN 
iow) 
po 
~J 
po 
dd 
Oo 
Oo 


Logical product (AND) of (M) 
and (A)—-A 


oo 
a] 
na 


bo 
iow) 
rar 
Q 
bh 
Psy 
[~) 
) 


Where (M) contains a 1 bit, 
complement the corresponding 
bitinA. 


wo 
lop) 
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TABLE B-1. IDENT PROCEDURE REFERENCES 


Operand 
Field Operation Object Code 


Where {M) contains a 1 bit, set 3 17 14 


the corresponding bit in A to 1 


Selective complement (exclu- 
sive OR) of y and (A)—-A 


Selective complement (exclu-_ 
sive OR) of y and (A)->A, sign 
of y extended 


Selective complement (exclu- 
sive OR) of y and (Bb)—Bb; 
becomes no-operation in- 
struction if b = 0 


Logical Instructions 


Selective complement (exclu- 
sive OR) of y and Q)—-Q 


Selective compl: ment (exclu- 
sive OR) of y and (Q)--Q, sign 
of y extended 
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TABLE B-2. MONITOR PROCEDURE REFERENCES 


Command Operand . 
Field Field Operation Object Code 


(Apo_ go) channel index register 3 
(Ags_o9) condition register 

(Ago_ oo) instruction state 

register 


(Ago_90)-roperand state register 


(Ay4-09) Page file index w; if 
b =1, (B*) used for indexing 


Transfer 


0—(A), then channel index 
register—Ao_o9 


Condition register—Ags_ qq; 
clear condition register 


(CR) Significance 


‘Boundary jump 
Destructive load A 
OSR in use 
Program state jump 


Interrupts enabled 


Program state 


0—(A), instruction state 
regis ter—Apo_oo9 
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TABLE B-2. MONITOR PROCEDURE REFERENCES 


Command Operand 
Field Field Operating Object Code 


Last executed jump address 
A14-00 


_ 
J 
p= 
~ 


| 


Load BCR and restore BDP 
conditions from data at m 


0—-(A); operand state register 
—A 
02-00 


0—A, then (page index file w) 
—Aj1-00; ifb is 1, (B2) used 
for indexing 


Subcondition register—condition 
register 


2 


~J 
«J 
fer) 
» | 0 
a 
o 
S 
2 


iw) 
(ae) 
= 
~~ 
pus 
- 
oO 
i) 


~] 
«J 


Set condition register for 
bqundary jump; system trans- 
fers from monitor state to pro- 
gram state when next jump 
occurs 


0000 


Store contents of BCR and BDP 
conditions at m for interrupt 
recovery. 


Set 01 in condition register to 
flag destructive load so that upon 
next LDA instruction: 


1. (MA 
2. 77777777-M 


3. 0-condition register 


0--A; subcondition register— 
Ag2-00 | 
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TABLE B-2. MONITOR PROCEDURE REFERENCES 


Command Operand ; 
Field Field Operation Object Code 


ous 3 


(M) > (A), RNI P+1 

(Q) > (M), RNI P+2 (Q) are 

(A) = (M) = Q), RNI P+3\ un- 
changed 


TMAV Initiate memory request; if reply 
occurs within 5 usec, address 
exists, RNI P+2; if not, address 
does not exist, RNI P+1; storage 
address tested is (B’) with 
operand state register) or zero 
appended 


S 
° 
ont 
n 
ot 
oO 
jo) 
AQ 


Pause Sensing Mask 


I/O channel 0 busy 
1 


Channel read or write operation in 
progress, the External MC logic 
within the channel is set, or a Reply 
or Reject from a previous operation 
is still present at the channel 


Typewriter I/O in progress 
Finish logic not set 
Repeat logic not set 
Search or Move operation in 
progress 


Typewriter busy 
Typewriter NOT finish 
Typewriter NOT repeat 
Search/Move control 

busy 
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| TABLE B-2. MONITOR PROCEDURE REFERENCES 


Command Operand 
Field Field ‘Operation Object Code 


Sense busy lines; if 1 appears on 
a line corresponding to 1 bits in 
x, do not advance P; if P is in- 
hibited for longer than 40 ms, 
read reject instruction from P+1; 
if no comparison, RNI P+2 


Same as PAUS, except real- 
time clock cannot increment 
during the pause. 


Program stops if selective stop | 23 00 


switch is on; upon restarting WY 


RNI P+1 


Jumps, Pauses, and Stops 


Unconditional stop; upon re- 00 
starting RNI P+1 


Clear the specified channel, 
but not external equipment 


If channel ch is busy, reject 
instruction, RNI P+1. If 
channel ch is not busy, send 
12-bit connect code (x) on 
channel ch with connect enable, 
RNI P+2 


External status code from I/O 
channel ch-Aj4_o9> (interrupt 
mask register)—-Ao3_ 09, RNI 


P+1 


Input/Output 
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INTERRUPT MASK REGISTER BIT ASSIGNMENTS 


I/O Channel 0 (includes interrupts generated within 
1 | 1 the channel and external equipment 
2 interrupts) 
| 3 
4 4 

4) 

6 

7 
Real-time clock 
Exponent overflow/underflow & BCD faults 
Arithmetic overflow & divide faults 
Search/Move completion 


TABLE B-2. MONITOR PROCEDURE REFERENCES 


Command 


‘ | Field 


Set console typewriter input. 
Beginning character address 
must be in location 23 of register 
file, last character + 1 must be 
in location 33 of the file 


Set console typewriter output 
Beginning character address 
must be in location 23 of register 


file, last character + 1 must be 
in location 33 of the file 


Sense external status; if 1 bits 
occur on status lines in any of 
the same positions as 1 bits in 
the mask, RNI P+1; if no com- 
parison, RNI P+2 


Input/Output 
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TABLE B-2. MONITOR PROCEDURE REFERENCES 


T 

y Command Operand 

p Field ‘Field Operation Object Code 
e 


INAC, INT (A) is cleared and a 6-bit char- 0 
acter is transferred from a 


6 bits of A 0 00 


| ol Yd 


INAW, INT (A) is cleared and a 12- or 24-| 23 00 


bit word is read from a periph-}) ace Yj 


eral device into the lower 12 
G 00 


dey ouU/O camel) 0 YY“. 


| 


= 
or) 


\ 
\\ 


INPC,INT, A G- or 12-bit character is 23 16 00 
B,H,A read from a peripheral device p 23h os 
and stercd in memory at a 


given location | 


ho 
or) 
be 
Oo 
tO 
pas 
for) 
=) 
oO 


Mise 
me 
; 


Input/Output 


uo) 
+ 
ear 
if) 
= 
| >| 


INPW,INT, 23 


B,N,A 14-00; 12- or 24-bit words are p 
read from a peripheral device 


and stored in memory 23 


— 
oO 
bt 
- 

i=) 

So 


: 


nO 
oo) 
~— 
foe) 
pes 
a | 
pot 
» 
Oo 
i) 


uo) 
+ 
_ 
QO 
| & | 
ae 
a 
Rea 
NOY 
fo) 


MOVE, INT Move £ characters from r to s; 23 16 
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TABLE B-2. MONITOR PROCEDURE REFERENCES 


Command Operand 
Field Field Operation Object Code 


p= 


Character from (Ags_gq) is 
sent to peripheral device, 
(A) retained 


OTAW,INT Transfers (Ay 00) or 23 16 00 
Ao3..99, depending on type of |p Ps Jl)t'Y]ww7 
i/o channel, to a peripheral Lie 
device 23 20 1816 00: 
p+ilch jiiWY Yy 
aN VW 
as 
8 
s 
g OUTC, INT, Storage words assembled into 23 16 00 
A. B,H,A 6- or 12-bit characters and p }7 ff ls 
5 sent to a peripheral device 
23 201816 0 
=: 
OUTW, INT, Transfer 12- or 24-bit words 23 17°14 00 


B,N,A from storage to a peripheral 


device 


“~ 


If channel ch is busy, read 
reject instruction from P+1; if 
not busy, send a 12-bit function 
code on channel ch with a func- 
tion enable, RNI P+2 


Lockout external interrupt on 
masked channels, cm, until 
channel is not busy 


CILO cm 


Interrupt 


c 
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TABLE B-2. MONITOR PROCEDURE REFERENCES 


Operation Object Code 


status-A 


Interrupt mask and internal if 17 14 11 


00 
[as for] — oo 


17 00 


Interrupt associated processor 23 11 
| 8 YM 

Interrupt faults defined by x 23 17 11 00 

var tata fs 


Interrupt 


Internal Status Sensing Mask 


Masked Bit : 
Positions Mask Codes (x) Interrupt Conditions Represented 


Parity error on channel ch 

Channel ch busy reading 

Channel ch busy writing 

External reject active on channel ch 

No-response reject active on channel ch 
fillegal write 

Channel ch preset by CON or SEL, but no 
reading or writing in progress 

Internal I/O channel interrupt on channel ch upon: 


1) completion of read or write operation, or 
2) end-of-record 
tExponent overflow/underflow fault (floating-point) 
tArithmetic overflow fault (adder) 
{Divide fault 
fBCD fault 


{Peripheral Equipment Reference Manual, Pub. No. 60108800 
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TABLE B-2. MONITOR PROCEDURE REFERENCES 


Operation Object Code 


i | Sense internal statusf; if 1 bits 

7 occur on status lines in any of 
the same positions as 1 bits in 
the mask, RNI P+1; if no com- 
parison, RNI P+2 


Sense for interrupt condition; ; 17 14 11 
if 1 bits occur simultaneously 77 4 [oh 
in interrupt lines and in the 

interrupt mask, RNI P+1; if 

not, RNI P+2 


Clears I/O channel or search/ 
move control as defined by bits 


00-07, 08, and 11 of x 


Set BCD fault logic 


Interrupt 


Selectively clear interrupt 
mask register for each 1 bit in 
x; corresponding bit in the 
mask register is set to 0 


Set floating-point fault logic 


Selectively set interrupt mask 
register for each 1 bit in x; 
corresponding bit in the mask 
register is set to 1 


tInternal faults are cleared when sensed. 
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BDP 
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TABLE B-3. BDP PROCEDURE REFERENCES 


Operand 
Field 


Operation 


Add field R to field S— 
field S 


Translate ASCII code field 
M-~BCD character field S 


Translate ASCII code field 
M--BCD character field S 
with delimiting character 
possibility 


Object Code 


A 
cm: 

[23 201816 00 
pH 
23 11 00 


a 


if 6 
Pies Ph m 
| 0 

j23 201816 


» CA | 


MY 


; 01 
je fH -m fF 
bs 201816 


00 
pei[3 Pq 
-B 9 . 00 


a>] 
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TABLE B-3. BDP PROCEDURE REFERENCES 


Operation Object Code 


Compare field R to field S 
from left to right, exit upon 
encountering # characters 


bo 
o 
foe) 


Ko) 
+ 
ped 
i 
ee 


Compare field R to field C 
from left toright, exit upon 
encountering =~ characters; 
delimiting character 


Y possibility 


vw) 
Oo 
[o.6) 


YK 


LA, 


Convert binary field M to 
BCD—field N 


Ze) 

+ 

peat 
iw) 

pa [CO 
iS) 
Oo 
—_ 
OO 
a 
fon) 


23 0) 


» IT, 
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TABLE B-3. BDP PROCEDURE REFERENCES 


Command Operand 
Field Field Operation 


Convert BCD field R to 
binary—field M 


Translate BCD field R to 
ASCII code—-field M 


Translate BCD field R to 
ASCII code—field M; 
delimiting character 
possibility 


pt2 


pt2 


Object Code 


23 


16 


lt, GU: 


00 


0 


00 


V1 


Pq mY 
17 


60236400 


D0 


ai. 


TABLE B-3. BDP PROCEDURE REFERENCES 


Command Operand 
Field Field Operation Object Code 


Field R—field S with COBOL 
type of editing specified by 
picture previously stored in 
field S 


Move field R-—field S; replace 
leading zeros with blanks; 
insert a comma after every 
three characters moved, 
insert a decimal point in third 
lowest order position in S 
field 


Test status of BCR = condition 
specified by mod and jump to m 
if true; otherwise, RNI P+1 


mod (BCR) 
HI 


ZRO 
LOW 
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TABLE B-3. BDP PROCEDURE REFERENCES 


T 
y Operand 
p Operation Object Code 
e 
MVBF Move characters from field R 23 16; 00 
blank fill 
23 201816 00 
2 11 00 
Move characters from field 16 00 
parameters mn 
; 23 101816 00 
~foPbL | 
2 
99 


iw) 
iv) 
foot 
— 
Oo 
oa 


MVE,dc Move characters from field R 23 16 


—field S; delimiting character fp fee toe 


possibility 


i) 
Go 
bo 
jo) 
_ 
[oo] 
— 
for) 
o 
oO 


So 

SS ad 

bomb 
ee, 
ov 
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TABLE B-3. BDP PROCEDURE REFERENCES 


Command Opcrand 
Field Field Operation _ Object Code 


oo 


RCRD RE RAE ERED SPAR a ETP a TT 


Move characters from field R 16 00 


“field S:iffield S> field, |p} ct ff 


zero fill 


Move characters from field R 2 
— field S; suppress leading R 
zeros 


BDP 
; 
4 
° - 


MVZS, dc Move characters from field R 16 0 
— field S; suppress leading ae 
zeros; delimiting character 
possibility [opibd ) a. ~ ) 0 


11 00 
2 


17 
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TABLE B-3. BDP PROCEDURE REFERENCES 


T ’ 
y Command Operand 
p Field Field Operation Object Code 3 
e | 
23 16 00 ‘ 
ee 
numeric BCD field and store the ’ 
result in field M ; 
Subtract field beginning at R 23 16 00 
from field beginning at S— p | ov ff r | 
field beginning at S ee 
Ay 
A 
ise) 


p a 
|< A 
(WA *. | 


SCAN, dir, 
mod 


Scan field beginning at R 


dir, mod 


LR,EQ Left to right 


stop on = 


RL,EQ_ Righttoleft 1 
stop on = 


LR,NE  Leftto right 2 
stop on # 


p+2 


RL,NE_ Right toleft 3 
stop on # 
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TABLE B-3. BDP PROCEDURE REFERENCES 


T 

y Command Operand 
p Field Field Operation Object Code 
e 


EL FAAS RTPA RE OSTEND eet rg oP PE SNS 


SCAN, dir, 
mod,dc 


SRCE,INT 


BDP 


SRCN, INT 


60236400 


Scan field beginning at R, 3 16 00 
delimiting possibility ip 
2 


2018 00 


LR,EQ Left to right, 


RL,EQ Right to left, pez] se | de fr. 


stop on= 


CS 


LR,NE Left to right, 
stop on # 


RL,NE __ Right to left, 


stop on = 
Search for equality of character _16 00 
c in list beginning at r until an Dp SS a aa 
equal character is found, or : 
until character at s is reached; 23 16 00 


0=c =63 
Operation commences while 
main control continues -at P+3. 


Inequality search; same as 
SRCE 


Test field R for -, 0, or+ 


WL 
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TABLE B-3. BDP PROCEDURE REFERENCES 


Command 
Field Operation Object Code 


Test field R for numeric 


Unpack 4-bit BCD field M 
into 6-bit BCD field S 


Clear field S; field R— 
field S, right justify 
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TABLE B-4. OCTAL CODE INDEX TO MNEMONICS 


ae a 
0. HLT 
| SJ1-SJ6 
RTJ 
UJP,I 


No-op 


IJI 


No-op 
IJD 
AZJ, EQ 
AZJ,NE 
AZJ,GE 
AZJ, LT 
AQJ, EQ 
AQJ, NE 


AQJ,GE 


AQJ, LT 
ISE 
ASE,S 
QSE,S 


ASE 


QSE 
ISG 


ASG 
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TABLE B-4. OCTAL CODE INDEX TO MNEMONICS 


MVE,dc 
MVZS,dc 


SCAN, LR, EQ 
SCAN, LR,NE 
SCAN, RL, EQ 
SCAN, RL, EQ 


SCAN, |RL, EQ, de 
SCAN, |LR, NE,de 


SCAN, IRL, EQ,dc 
SCAN, |RL, NE, de 


53.01 
53.02 


53. 04 


53. (0+b)0 ; 3 _ {SRCE,INT 
SRCN, INT 


53. (0+b)3 
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TABLE B-4. OCTAL CODE INDEX TO MNEMONICS 
Octal Code 


MOVE, INT 


INPC,INT,B,H,A 
INAC, INT 


OUTC,INT,B,H,A 
INAW, INT 
INPW,INT,B,N,A 


OUTC,INT,B,H,A 
OTAC, INT 


OUTW,INT,B,N,A 
OTAW, INT 


CON 


SEL 


EXS 
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BINARY OUTPUT C 


When the META source deck contains a UNIT directive, the object computer is not the 3300 or 
3500, and binary output (if requested) is in an alternate form. Information is written as binary 
card images, that is, in 40-word logical records in standard MASTER blocked format (MASTER 
Reference Manual). 


Each 40-word logical record consists of a set of 160 6-bit bytes. Binary output is in the form of 
a byte stream. The first four bytes of each logical record are: 


Byte Value 
1 Unused; 0 
2 05, 
3 Unused; 0 
4 Unused; 0 


The byte stream consists of multibyte items. The first byte of an item is its item type, indicating 
the class of information. The number and contents of the bytes in the item vary according to item 
type. 


Type Byte | Information 
1 Item type 
2-9 Control section name 
1 
10-13 Control section byte length 
14 Chapter number (3 bits) 
1 Chapter 1 
2 Chapter 2 


Control section type (3 bits) 


0 Absc'ute 
1 Program 


2 Labeled 
3 Numbered 
4 Blank common 
1 Item type 
2 
2-9 External symbol 
1 Item type 
3 2 Location counter number 
3-6 Load address (byte address) 


60236400 . , . C-1 


Information 


‘Item type 
Contents of a word (n bytes) 


Item type; item contains relocation information associated with preceding 
type 4 item 


lLeftmost bit position of field in ward (7 bits) 


\Field size (7 bits) 
Positive or negative relocation (1 bit) 


0 Positive 
; 1 Negative — 
Word or Byte relocation (1 bit) 


1 


0 Word 
1 Byte 


Unused; 0 (2 bits) 


} 
Relocation counter 


Item type; item contains external reference information associated with 
preceding type 4 item 


Bit position of field in ward (7 bits) 
Field size (7 bits) 
Positive or negative relocati}n (1 bit) 


0 Positive 
1 Negative 


Word or byte relocation (1 bit) 


0 Word 
1 Byte 


External symbol table ordinal (14 bits) 
Item type 

Entry point symbol 

Entry point byte address 


Relocation counter 

Item type 

Transfer symbol 

Item type; end of stream on a logical record 


Item type; end of stream 


60236400 


The number of bytes in a type 4 item is a function of the object computer word size. A value is 
right justified in the number of bytes required. For example, if the object computer word size is 
19 bits, n equals 4. 


‘All symbols are left justified and blank filled in eight bytes. The collection of type 2 items forms 
the external symbol table. Type 7 items refer to this table. 


For type 6 and 7 items, bit positions are numbered from right to left in ascending order, begin- 
ning with zero. Thus, for a word address reference on the 3300, the following is true. 


Leftmost bit position of field in word 14 
Field size . 15 


When word size is 12, the leftmost bit position of a 13-bit field is 0. 
Example: 


The following program results in the binary (byte) stream shown. 


Program: 
f" Z 
{J ys . 
ate “(DIR ; 
f } {> Acree 
AG ) A 
Oo £2 
a - 
A oY f) 
~The. 
ANE, 
r\ Aj tt 
60236400 


Binary stream of 6-bit bytes: 


Card 1 


Card 2 


The first four bytes cause rows 7 and 9 to be punched in column 1 of a binary card; column 2 is 
blank. Successive bytes consist of items and their associated information. A space is indicated 
by A. 
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For a subprogram, all external symbol items (item type 2) form a table of external symbols that 
immediately follows the table of control section name items. , 


Normally, a load address item (item type 3) immediately follows the last external symbol item. 
A load address item appears in the stream as necessary and always precedes the first contents- 
of-word item (item type 4). If a load address is more than one greater than the address 
associated with the previous contents-of-word item, META generates a load address item. 


Example: 
ry d 
: & - ye 
j SEV l New load address 
1 EA New load address 
» VE 
‘= a" 2 New load address 
END Mk 
& The binary output stream for the above is as follows. 
Card 1 
| 
| 
| 
Card 2 
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For a subprogram, all control section name items (item type 1) form a table of control section 
names, This table is first in the binary output stream. The entries in the table are in order 
according to their associated location counters. The first entry is for counter 0 or 1 depending 
on whether or not the program uses 0, the absolute location counter. 


Example: 


First entry in the control section name table is for location counter 0. 


Location counter 2 


rn Location counter 0 


hoi ‘ 


Location counter 3 


Rett l h) an, . 


Card 2| 


C-6 . ; 60236400 


It is possible to change control sections at points other than at word boundaries and resume the | 
control sections. 


Example: 
Causes item 4 to be 5 bytes 

SECP. . JOB Causes item type 1 

IEE Causes item types 3 and 4 

A s 
an) = OF, ALK Causes item type 1 
NE w. Causes item types 3 and 4 

KE F Returns to address A (counter 1) 
a- AJB Causes item types 3 and 4 
1Vii/ A? Causes item type 9 (11,) 


The binary output stream for the above is as follows. 


These 2 items must be combined 
to form 1 object computer word. 


Card 1 


60236400 


For the previous example, note that in the control section named JOB, two contents-of-word 
items (item type 4) are generated for the contents-of-word location zero. 


senna [oa | or | 00 | 00 | 00 
GENB 3 pee (ae Fase eo |e 
Contents-of-word  - | 01 | 03 | 00 | 00 | 


A field with a size greater than that of the object computer word may contain a relocatable value 
or an external symbol plus or minus a constant. More than one contents-of-word item (type 4) 
result, but they are not consecutive. A relocatable reference item (type 6) or an external 
reference item (type 7) immediately follows the first contents-of-word item (type 4). The 
condition can be detected when the leftmost bit in the word and the field size indicate a poerot 
beyond the preceding computer word. 


Example: 
NEE A Causes item 4 to be 3 bytes 
“SECP. AM Causes item 1 
3 RES i ‘ 
. FORM Ak. i 48-bit tield (four 12-bit words) 
Fi. a ss Causes items 3, 4, 6, 4, 4, 4 
2 FOR 
- Causes items 4, 6, 4 
ND fi , Causes items 4, 6, 4 
IVE, X MA Causes item 9 


C-8 7 60236400 


Leftmost 12 bits of 48-bit field; first word. 
Leftmost bit in word is 11; field size is 48. 


Second word. 


8 (g(a |e/2 |>la| 


Third word. 
Card 1 00 | Rightmost 12 bits of 48; fourth word. 
00 | 11-bit field containing 7 and leftmost bit of 13-bit field. 
00 | Leftmost bit is 0; field size is 13. 
00 Jor 13-vit field containing 1. 
00 [09 | First 12 bits of 24 for GEND. 
05 [4s | Leftmost bit is 11; field size is 24. 
| 00 [oo Second 12 bits of 24 for GEND. 
x | 
Card 2 Ra 


“I - oO Oo oO colo 
lsfelslelele| = relelelele| ape 
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3300/3500 RELOCATABLE BINARY OBJECT DECK D 


The 3300/3500 MASTER relocatable loader accepts relocatable binary object decks produced by the 
Meta-Assembler when there is no UNIT directive. During assembly, the X or F option on the META 
control card uses card images of the relocatable deck to be written on the LGO file (or some other 


file optionally specified). 


The P option on the META card causes the binary deck to be punched. A 


binary deck is comprised of the following types of cards. 


Subprogram identification card (IDC) 
Block common table cards (BCT) 


Subprogram entry point cards (EPT) 


Relocatable information cards (RIF) 


External name and linkage cards (XNL) 


Transfer cards (TRA) 
End loading card (ELD) 


These cards are described in the MASTER Reference Manual. Information on the cards is related 
to directives as shown in table D-1. 


Card 


IDC 


BCT 


EPT 
RIF 


XNL 
TRA 
ELD 


60236400 


43g 
4438 
778 


Table D-1 Loader Cards 


Source of Information 


Name taken from SECP directive; length of subprogram calculated 


_ by META. 


Names of labeled and numbered common blocks taken from SECD 
directives. 


Entry points taken from ENTRY directives. 


Relocatable information generated by mnemonic instructions, GEN, 
GEND, GENB, LIT, TEXT, TEXTC, TEXTA. RES or RESB 
causes start of new RIF card. Relocation factor set for character 
addressing if symbol generated is defined in bytes. Increment/ 
decrement count and base depend on relocation counter used by 
Meta-Assembler. 


External symbols taken from EXT directives. 
Transfer point symbol taken from END directive. 


Card generated upon encountering FINIS. 


aes Se ae 
5 ea Pe 


Sa Daag 


Ee REE 


GLOSSARY OF TERMS 


Absolute program 
A program that must be loaded into specific core storage locations. 
Assemble 


To prepare an object language program for the 3300/3500 Computer System or for some 
‘other computer system from a symbolic source language program. 


ASCII 
American Standard Code for Information Interchange 

Attribute 
A characteristic of a symbol (value), such as its size in words or bytes and its mode of 
representation (decimal, octal, character, etc.). 

Byte 


A subdivision of a word as defined by a UNIT directive, if the source program contains 
one; otherwise, a byte is 6 bits. 


. Byte stream 


Output from the Meta-Assembler when the source program contains a UNIT directive. 
Each 40-word record (160 6-bit bytes) consists of 11 types of multibyte items. 


Command 


The field in the source statement that specifies the operation to be performed by the 
Meta-Assembler. 


Control Section 
The portion of object code generated under a single location counter. 
Definition 
1. A group of source statements comprising a procedure or function. 2. The association 


' of a symbol with a value and its other attributes so that use of the symbol causes its value 
- or the address of its value to be used. 
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Delimiter 


Character or characters that limit a string of characters and therefore cannot be a member — 


of the string. 
Directive 
A source statement that instructs a Meta-Assembler. 
Elementary item 
A self defining component of an expression. 
Entry point 
A label of a source statement at which execution or processing can begin. 
Expression 


A valid series of values, symbols, and functions that may be connected by mnemonic or 
symbolic operators as required to cause a desired computation. 


External symbol 
A label defined in a subprogram other than the subprogram or at a level othe. than a level 
currently being assembled and used as an.operand in the program or at the level being 
assembled. . 

Forward reference 
A label that is referenced in the operand field and has not been defined previously. 


Function 


A series of source statements that, when referenced, provides a single value or a set to 
be used in the source statement containing the reference. , 


Label 
1. A string of alphanumeric characters used to identify or describe an item or placed at 
any location for informational and instructional purposes. 2. To assign a symbol as a 
means of identifying a source statement or a location in an object deck. 

Literal 


An item of data having a constant value. 
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Location counter 


A counter for the 16 control sections controlled by the assembler. 


Meta-Assembler 


An assembler that transcends the capabilities of a conventional assembler by allowing 
extensive programmer control of the assembly process. 


Mnemonic instruction 


Use of symbolic notation in place of actual machine code. A mnemonic instruction must 
be translated to actual operation codes by META procedure references. 


Operand 


A piece of data upon which an operation is performed; the contents of the operand field of 
a source statement. 


Operator 


The symbol or mnemonic that tells what to do with two operands, e.g., * is the operator 
for multiplication of the two operands as inA * B. 


Procedure 


A subset of source statements meeting a specific purpose that can be repeatedly referenced 
to cause parameterized code generation. 


Processing 


The interpretation by the Meta-Assembler of a source statement or group of source 
statements. 


Real number 


A value written with a decimal point, using decimal digits. The sign is a unary operator. 
An integer exponent preceded by E may follow the real number. 


Symbolic referencing 
The assembler allows mnemonic symbols to be used in place of instruction codes, modi- 


fiers, addresses, formats, procedures, and functions. The assembler interprets the 
symbol and determines where to find specific information. 
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Set 
A collection of elements that bear a relationship to one another and have a common name. 
An element may be a set; i.e., a subset of a set. A reference to an element consists of 
the set name followed by one or more integers enclosed in brackets eas the location 
of the element. 


Source program 


A program written in META language that must be translated into machine language before 
it can be executed. 


Statement 

An instruction interpreted by an assembler. 
Subprogram 

A part of a program that can be assembled independently. 
Subscript 


One or more integers enclosed by brackets used to specify a particular element in a set. 


Unary operator 


> 


& ; 
An operator such as the sign of a value (+ or -) that operates on one operand only rather 
than causing an addition or a subtraction. : 


Word 


A group of bytes as ‘defined by the UNIT directive if the source program contains one; 
otherwise, 24 bits, the standard 3300/3500 word size. 
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INDEX 


A Asterisk, single 
ASCII string indicator 2-8 multiplication symbol 2-9 
conversion modifier B-4 example 2-10; 4-21, 22 
Account number 7-2 to indicate comments 2-3 
ACI instruction B~-21 ATD instruction B-30 
ACR instruction B-21 Attributes,|description 2-12 
ADA instruction B-12 Atribute functions 6-1 
ADAQ instruction B-12 AZJ instruction B-15 
Addressing 


absolute 4-10 
byte-oriented 3-1 


word-oriented 3-1 B 
ADM instraction B-30 backward read/write modifier B-4 
q AEU instruction B-9 BCD character notation 2-7 
q AIA instruction B-12 BCD integer notation 2-6 
q a AIS instruction B~21 _ * BCD pseudo instruction B-7 
Y ANA instruction B-19 BDP procedure references B-30 
ANI instruction B-19 Binary scaling 
ANQ instruction B-19 example 2-13; 6-5 
AOS instruction B-21 operator 2-9 
APF instruction B-21 Blank, double 2-1, 5 
|Apostrophe Blank fill 
character in ASCII string 2-8 BCD characters 2-8 
character in BCD string 2-6 Blank, single 
delimiter, 2-5 elementary item separator 2-2,5 
in TEXT directive 4-18 expressions 2-11 
printer character A-2 _ Bracket delimiter 2-5, 15 
AQA instruction B-12 BRIEF directive 
AQE instruction B-9 byte-oriented directive 3-1 
AQJ instruction B-14 description 4-3 
Arithmetic 2-12 BSS pseudo instruction B-7 
Arithmetic instructions B-13 Byte 
ASCII code attribute function (BYT) 6-8 
character set A-3 examples 4-15; 6-7, 8 
generation of text 4-18 generation 4-15 
instructions (See BDP [procedure position in object|word 8-1 
references) size 4-4 
notation 2-8 Byte address, |mode 6-2 
ASE instruction B-15 Byte stream 
ASG instruction B-15 file for 7-3 
Asterisk, double 2-9 format C-1 


selection as output 4-4 
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character address modifier B-4 
common error code 8-3 
for right-adjusted BCD string 2-7 
Card codes A-1 
Chapter, assign data to 4-9 
Character set 
BCD/ASCII conversion A~3 
card codes A-1 
internal codes A-1 
legal characters 2-1 
Printer graphics A-l 
Character string 
ASCII notation 2-8 
BCD notation 2-7 
Mode 6-2 
Character instructions B-14 
Characteristic of real number 2-7| 
CIA instruction B-21 
CILO instruction B-27 
CINS instruction B-28 
Circularity of form 4-17 
CLCA instruction B-24 
CMP instruction B-31 
Comma 
command field delimiter 2-2 
set element delimiter 2-15 
to delimit, general 2-5 
Command field, description of 2-2 
Comment field, description 2-3 
Comment line 
description 2-3 — 
example 2-4 
Common block 
blank 4-9 
illegal assignment of literalsto 2-14 
in byte stream C-1 
labeled 4-9, example 4-11 
numbered 4-9, example 4-11 
zero 4-9 
Common error 8-3 
Compare symbols and mnemonics 2-9 
examples 2-11 
COMPASS language 
general differences from META 1-1 
pseudo instructions B-1, 7 
CON instruction B-24 
Concatenation of symbols 6-5 
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Configuration, minimum for META 1-2 
Continuation of source statement 
description 2-3 
examples 2~4 
Control cards required 7-1 
Control section 
absolute 4-10 
creation 4-8,9,10 
general features 1-1 
list 8-4 
name 4-8,9,10 
name as word address 3-1 
relocatable 4-8 
COPY instruction B-24 
CPR instruction B-23 
CRA instruction B-21 
Cross reference table 
format 8-5 
selection 7-4 
CTI instruction B-25 
CTO instruction B-25 
CVBD instruction B-31 
CVDB instruction B-32 
Current address symbol (see dollar sign) 


+ 
2 


D . 
double definition error code 8-3 
for BCD integer 2-6 
DEC pseudo instruction B-8 
Decimal integer notation 
description 2-6 : 
Decimal point in real number 2-7 
Decimal scaling 
of real number 2-7 
operator in expression 2-9 
Decision instructions 
IDENT B-15 
MONITOR B-23 
Deck structure, examples 7-7 
Definition 
- form 4-15 
function 5-1,3 
machine 4-4 
procedure 5-1, 2 
set, 4-4,6 
symbol 4-4 
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Delimiters 2-5 END directive 
Delimiting character modifier B-4 description 4-24 
DETAIL directive examples B-3; C-3,5,6,7,8 
as byte-oriented directive 3-1 relationship to TRA card D-1 
description 4-3 | End-of-fileleard 7-6 
Diagnostic messages 8-5 ENDS directive 
DINT instruction B-17 as byte-oriented directive 3-1 
4 Directives description 5-5 
data generating 4-13 examples 4-23; 5-1,2,3,5,6, 8,9, 10,14; 
definition 4-1 6-5,6 
location control 4-8 ENI instruction B-9 
machine defining 4-4 ENQ instruction B-9 
procedure defining 5-2 ENTRY directive 
program linking 4-19 as byte-oriented directive 3-1 
repeat 4-20 description 4-19 — 
: skip 4-21 example B-3 
q symbol defining 4-4 relationship to EPT card D-1 
uses 4-1 Entry point symbol 
Dollar sign ; declaration 4-19 
as current address symbol 2-10 . list 8-4 
examples 4-5, 13,17 EQ modifier B-4 
a as word address 3-2 EQU directive 
YY to change symbol level 5-13 description 4-5 . 
examples 5-13,14; 6-5,6,7 examples 3-2; 4-5,7, 8, 21; 5-6,11,13, 
Double definition error 8-3 14; 6-1, 2,3,4,6, 7,8; B-4 
example 4-5 Errors, assembly 
DTA instruction B-32 codes for 8-3 
Dummy label 4-22 .on listing 8-1 
DVA instruction B-12 : lines 8-4 
DVAQ instruction B-12 EUA instruction B-9 
Expression 


arithmetic 2-12 
definition 2-10 


E evaluation 2-10,12 
exponent indicator 2-7 examples 2-10,11,13 
expression error code 8-3 mixed mode 2-12 
example 8-2 Imode 2-12 
EAQ instruction B-9 parenthetical 2-11 
ECHA instruction B-14 relational 2-13 
EDIT instruction B-33 subexpressions 2-10 
EINT instruction B-17 Expression error 8-3 
EJECT directive EXS instruction B-25 
as byte-oriented directive 3-1 EXT directive 
description 4-2 as byte-oriented directive 3-1 
Elementary items 2-4 description 4-19 
ELQ instruction B-9 examples 4-14; 6-6,7,8; C-3 
ENA instruction B-9 . relationship to XNL card D-1 
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External symbol 
declaration 4-19 
list 8-4 
UIC required as B-~2 


forward reference error code 8-3 
to force execution 7-4 
FAD instruction B-12 
FDV instruction B-12 
FINIS directive 
description 4-24 
example B-3, C-3 
relationship to ELD card D-1 
Floating point . 
data generation 4-14 
in expression 2-12 
instructions B-12 
mode 6-2 
notation 2-7 
pseudo instruction B-8 
FMU instruction B-12 
Forced execution 7-4 | 
FORM directive 
description 4-15 
example 3-2; 4-16 
FORM reference 
as byte-oriented statement 3-1 
description 4-16 
example 3-2; 4-16,18; 5-6; C-3,8 
Forward reference 
discussion 4-7 
examples 4-7,8 
in procedure definition 5-1, 2 
Forward reference error 8-3 . 
FRMT instruction B-33 
FSB instruction B-12 
FUNC directive 
description 5-3 
example 5-1,3,5,7,11 
Function 
attribute 6-1 
definition 5-1- 
processing 5-9| 
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- Function reference 


description 5-11 
example 5-3,11; 6-1, 2,3,5,6, 7,8 


GE as modifier B-8 
GEN directive 
as word-oriented directive 3-1 
description 4-13 
example 4-7,8, 20,21; 5-14; C-3,5 
relationship to RIF card D-1 
GENB directive 
as byte-oriented directive 3-1 
description 4-15 
example C-7 
relationship to RIF card D-1 
GEND directive 
as word-oriented directive 3-1 
description 4-14 
examples 4-14; C-8 
Generate object code 
by word 4-13 
by byte 4-15 
by two words 4-14 
Generation of byte stream D-1 
STO directive 
as byte-oriented directive 3-1. 
description 4-21 . 
example 6-1,3 
processing 4-24 


H 


half assembly/disassembly modifier B-4 


Heading (see TITLE directive) 
HLT instruction B-17 


indirect address modifier B-5 
illegal instruction error code 8-3 
to select input file 7-4 

IAI instruction B-13 

IAPR instruction B-28 

IDENT procedure set B-1,9 


IDENT pseudo instruction 
description B-4 
example B-3 

IJD instruction B-15 

IJI instruction B-15 

Illegal instruction error 8-3 

INA instruction B-13 

INAC instruction B-26 

INAW instruction B-26 

INCL instruction B-28 

INI instruction B-13 

INPC instruction B-26 

Input files 7-4 

Input/output instructions B-24 

INPW instruction B-26 

INQ instruction B-13 

INS instruction B-29 

Instructions, machine 
arithmetic B-12 
BDP B-30 
character B-14 
decisions B-15, 23 
floating-point B-12 
input/output B-24 
interrupt B-17, 29 
jumps, pauses, stops B-17, 24 
logical B-19 
no-operation B-18 
shift B-18 
transfer B-9,21 

INT interrupt modifier B-5 
interrupt instructions B-17, 29 

Integer 
BCD notation 2-6 
decimal notation 2-5 
octal notation 2-6 
mode 6-2 

Internal octal codes A-1 

INTS instruction B-29 

IOCL instruction B-29 

ISA instruction B-21 

ISD instruction B-15 

ISE instruction B-16 

ISG instruction B-16 

ISI instruction B-16 
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JAA instruction B-22 

JMP instruction B-33 

JOB control card 
description 7-1 
examples 7-7 

Job identification 7-1 

Jump, pause, -stop instructions 
IDENT B-17 
MONITOR B-24 


to indicate left-adjusted BCD character 
string 2-7 
to select list output 7-4 
Label field 
description 2-2 
LACH instruction B-14 
LBR instruction B-22 
LCA instruction B-9 
LCAQ instruction B-10 
LDA instruction B-10 
LDAQ instruction B-10 
LDI instruction B-10 
LDL instruction B-19 
LDQ instruction B10 
Left-adjusted character strings 
description 2-7 
example 4-18 
Library 
procedures B-1 
*LIB 5-7; 7-1 
LIBS directive 
as byte-oriented directive 3-1 
description 5-7 
example 5-8,10; B-2,3 
to obtain|instruction set B-2 
LIST directive 
as byte-oriented directive 3-1 
description 4-2 
List 
brief 4-3 
control 4-1 
detailed 4-3 
format 8-1 
of comments 2-3 


Index-5 


of sequence columns 2-2 
parameter on META card 7-4 
resumption 4-2 
suppression 4-2 
LIT directive 
as byte-oriented directive 3-1 
description 4-12 
relationship to RIF card D-1 
Literal 
assignment 4-12 
symbols 2-9, 14 
description 2-14 
listing 8-4 
_ LNID directive 
description 4-22 
examples 4-20, 22,23, 24; 6-3 
Load and go output 
scheduling of mass storage 7-3 
selection 7-4, 7, 8,10 
Location counter 
$ reference to 2-10 
absolute 3-3 
assignment 3-3 
data 3-3; 4-9 ° 
description 3-3 
general feature 1-1 
program 3-3; 4-10 
relocatable 3-3 
“rounding up of 3-2| 
Logical instructions B-19 
Logical operators : 
symbols, mnemonics 2-9 
LOW BCR modifier B-5 
LPA instruction B-19 
LR left/right modifier B-5 
LT less than modifier B-5 
LQCH instruction B-14 


Machine definition (see UNIT directive) 
Mantissa of real number 2-7 
Mass storage 

minimum required 1-2 

scratch 7-3 

standard 7-3 
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Memory, core 
examples of scheduling 7-7, 8,9,10,11 
minimum required 1-2 
scheduling 7-2,3 
MEQ instruction B-16 
Messages, error 8-5 
Meta-assembler 
configuration 1-2 
definition Glossary-2 
features 1-1 
execution 7-1 
library task 7-1 
META control card 
description 7-3 
examples 7-5, 7, 8,10 
Mnemonic operators B-3 
Mnemonic instructions for 3300/3500 
general differences from COMPASS 1-1 
list B-1 
Mode of expression 2-12 
Mode of value 
definition 6-2 
related to size 6-4 
Mode (MDE) “attribute 6-2 
Modifiers, command field 
% general format 2-3 
3300/3500 instruction B-4, 9 
MONITOR procedures B-21 
MOVE instruction B-26 
MTH instruction B-16 
MUA instruction B-13 
MUAQ instruction B-13 
MVBEF instruction B-34 
MVE instruction B-34 
MVZF instruction B-35 
MVZS instruction B-35 


nesting error code 8-3 
no assembly/disassembly modifier B-5 
NAME directive 
description 5-3 
examples 4-23, 24; 5-2,3,4,5,6, 7, 8,9, 
5-10,11,14; 6-5,6 . 
NE not equal modifier B-5 
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Nesting level Pp 
procedure/function 5-1 punch selection parameter 7-4 
repeat 4-20 register B-5 

NOLIST directive PAK instruction B-36 
as byte-oriented directive 3-1 Parentheses 
description 4-1 delimiter 2-5 

NOP instruction B-18 enclosing function arguments 5-11 

Nesting enclosing nested expressions 2-10 
expressions 2-12 PAUS instruction B-24 
functions/procedures 5-1, 12 PFA instruction B-22 
sets 2-15 Printer 
repeated groups 4-20 eject of page 4-2 

NSET directive line limit for job 7-1 
description 4-6 list control 4-1 
example 4-6, 7, 8,14,16,17; 5-3,4,5, 11; output on 8-1 

6-2,3,4 scheduling mass storage 7-3 

Number of elements attribute (NUM) 6-3 selection 4-3; 7-4 

Null set element 2-15 spacing 4-2 


PROC directive 
description 5-2 
examples 4-23, 24; 5-1,2,4,5,6, 7, 8,9, 10, 


O 5-14; 6-5,6 
to indicate octal integer 2-6 on library 5-8, 10 
Object computer 1-1; 4-4 processing 5-9 
Octal instruction index B-39 - Procedure reference 
Octal notation as byte-oriented statement 3-2 
example 2-6; 4-17 BDP B-30 
3 format 2-6 description 5-10 
q Operand field format 2-3 examples 5-2, 8,10, 14; 6-5,6; B-3,7,8 
: Operators IDENT B-1,9 
examples 2-10,11,13 MONITOR B-21 
hierarchy 2-9 processing 5~-10,13 
legal combinations 2-13 Procedure 
list 2-9 definition 5-1 
ORG directive nesting of 5-12 
as byte-oriented directive 3-1 processing 5-9 
description 4-11 repetition 4-23 
example 4-11; C-7 standard library B-1 
OSA instruction B-22 Processing 
OTAC instruction B-27 forward reference 4-7 
OTAW instruction B-27 function definition 5-9 
OUTC instruction B-27 function reference 5-10,12 
Output files 7-4 GOTO 4-23 
OUTW instruction B-27 ’ procedure definition 5-9 
procedure reference 5-9,12 
RPT 4-23 


Program section (see control section) 
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PRP instruction B-24 
Punch output 
card limit for job 7-1 
scratch needed 7-3 
selection 7-4 


Q 

register B-5- 
QEL instruction B-10 
QSE instruction B-17 
QSG instruction B-17 


relocation error code 8-3 
select cross reference 7-4 
RAD instruction B-13 
RCR instruction B-22 
RDEF directive 
description 4-5 
example 4-5, 6,7,21,23; 5-2,9; 6-3 
Real notation 2-7 
Reference 
FORM 4-16 - 
forward 4-7 
function 5-11 
procedure 5-10 
set 2-15 
-set element 2-15 
Relocatable expression, rules 2-11 
Relocation attribute (REL) 6-1 
Relocation error 8-3 
Relocation of operand 8-1 
RES directive 
as word-oriented directive 3-1 
description 4-12 
example 3-2; 4-8,11,12; 6-4,7,8 
relationship to RIF card D-1 
RESB directive 
as byte-oriented directive 3-1 
description 4-13 
example 3-2; 4-13; 6-4, 7,8; C-7 
relationship to RIF card D-1 
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Repeat 4-20 
Reserve storage 
bytes 4-13 
words 4-12 
Right-adjusted 
character strings 2-7, 8 
examples 2-7; 4-14,17 
values in fields 4-16 
RIS instruction B-10 
RL right/left modifier B-5 
ROS instruction B-10 
RPT directive 
description 4-20 
examples 4-20, 21; 6-3 
processing 4-23 
RTJ instruction B-17 


Ss 
syntax error code 8-3 
SACH instruction B-14 


“SBA instruction B-13 


SBAQ instfuctiorB-13 
SBCD instruction B-29 
SEJP instruction B-22 
SBM instruction B-36 
SBR instruction B-22 
SCA instruction B-19 
Scaling, binary 
example 6-5 
factor 2-14 
operator 2-9 
Scaling, decimal 
factor 2-14 
operator 2-9 
of real number 2-7 
SCAN instruction B-36 
SCAQ instruction B-18 
SCHA instruction B-14 
SCHED control card 
description 7-2 
example 7-7, 8,9,10 
SCIM instruction B-29 
SDL instruction B-22 
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SECA directive 


as byte-oriented directive 3-1 


description 4-10 
example C-5 
SECD directive 


as byte-oriented directive 3-1 


description 4-9 
example 4-11; C-5,6,7 


relationship to BCT card D-1 


SECP directive 


as byte-oriented directive 3-1 


description of 4-9 


example 3-3;4-11; 5-6; C-3,5,6,7,8 
relationship to IDC card D-1 


Segments of mass storage 


examples of scheduling 7-7, 8,9,10 


minimum for META 1-2 
scheduling 7-2 

SEL instruction B-27 

Semicolon 2-2, 3 

Set 
assignment 4-6; 5-2,3 
definition 4-6 
description 2-15 
element 2-15 
example 2-15; 4-6 
function reference 5-10 

. procedure reference 5-10 

subsets 2-15 

SFPF instruction B-29 

SHA instruction B-18 

SHAQ instruction B-18 

Shift instructions B-18 

SHQ instruction B-18 

SJj instruction _B-17 

SLS instruction B-24 

Size attribute (SZE) 6-4 

Space (see blank) 

SPACING directive 


as byte-oriented directive 3-1 


description 4-2 
SQCH instruction B-14 
SRA instruction B-22 
SRCE instruction B-37 
SRCN instruction B-37 
SSA instruction B-20 
SSH instruction B-19 
SSIM Instruction B-29 
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STA instruction B-10 
STAQ instruction B-10 
Statement 
format 2-2 
number 8-1 
STI instruction B-10 
STQ instruction B-11 
SWA instruction B-11 
Symbol 
attributes 6-1 
concatenation 6-5 
definition 4-4 
entry point 4-19, 24 
external 4-19 
illegal 6-6 
level 5-13 
reserved B-3 
Symbol attribute (SYM) 6-5 
Syntax error 8-3 


T 
truncation error code 8-3 
TAI instruction B-11 
TAM instruction B-11 
Task name control card 
description 7-5 
example 7-7,9,10 
Termination 
assembly, abnormal 8-5 
assembly, normal 4-24 
function definition 5-5 
procedure definition 5-5 
reference to definition 5-6 
repeat 4-20 


subprogram assembly 4-24 


TEXT directive 


as word-oriented directive 3-1 
description 4-18 
relationship to RIF card D-1 


TEXTA directive 


as word-oriented directive 3-1 
description 4-18 
relationship to RIF card D-1 


Index-9 


TEXTC directive 
as byte-oriented directive 3-1 
description 4-18 
relationship to RIF card D-1 
TIA instruction B-11 
TIM instruction B-11 
Time limit for job 7-1 
TITLE directive 
as byte-oriented directive 3-1 
description 4-3: 
TMA instruction B-11 
TMAV instruction B-22 
TMI instruction B-11 
TMQ instruction B-11 
TQM instruction B-11 
Transfer instructions B-9,21 . 
TREF directive 
as byte-oriented directive 3-1 
description 5-6 
example 5-6 
Truncation é 
, ASCII character string 2-8 
BCD character string 2-8 
BCD integer 2-6 
decimal integer 2-6 
error code 8-3 
expression value 2-11 
octal integer 2-6 
real number 2-7 
sign bits 8-3 - 
word size 4-13 
TST instruction B-37 
TSTN instruction B-38 
Two-pass option 5-1, 2 


U 
undefined symbol error 8-3 
UCS instruction B-24 
UIC routine B-3 
UJP instruction 
procedure reference B-17 
example B-3 
Unary equal 2-9, 14 
Unary double equal 2-9, 14 


Index-10 


Unary minus 2-9 

examples 2-5, 6; 4-12, 15 
Unary plus 2-9 
UNIT directive 

description 4-4 


example 3-2; 4-17; 6-7; C-3, 5, 6, 7, 8 


UPAK instruction B-38 


Word 
attribute function (WRD) 6-7 
generation 4-13 
size 4-4 
Word address 3-1 
list 8-1 
mode 6-2 


code on listing 8-1 

load and go parameter 7-4 
XOA instruction B-20 
XOIl instruction B-20 


’ XOG instruction B-20 


ZADM instruction B-38 

Zero element 4-6 

Zero fill 
ASCII character strings 2-8 
BCD character strings 2-8 
odd-sized field 4-18 


' Zero, negative 2-11 


ZRO BDP modifier B-6 
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